| Last change
 on this file since 1670 was             829, checked in by Kevin Toppenberg, 15 years ago | 
        
          | 
Upgrade to version 27
 | 
        
          | File size:
            583 bytes | 
      
      
| Rev | Line |  | 
|---|
| [829] | 1 | program VA508JAWSDispatcher; | 
|---|
|  | 2 |  | 
|---|
|  | 3 | uses | 
|---|
|  | 4 | Forms, | 
|---|
|  | 5 | fVA508DispatcherHiddenWindow in 'fVA508DispatcherHiddenWindow.pas' {frmVA508JawsDispatcherHiddenWindow}, | 
|---|
|  | 6 | VAUtils in '..\..\VAUtils.pas', | 
|---|
|  | 7 | VAClasses in '..\..\VAClasses.pas', | 
|---|
|  | 8 | JAWSCommon in 'JAWSCommon.pas', | 
|---|
|  | 9 | VA508AccessibilityConst in '..\VA508AccessibilityConst.pas'; | 
|---|
|  | 10 |  | 
|---|
|  | 11 | {$R *.res} | 
|---|
|  | 12 |  | 
|---|
|  | 13 | begin | 
|---|
|  | 14 | if AnotherInstanceRunning then exit; | 
|---|
|  | 15 | Application.ShowMainForm := FALSE; | 
|---|
|  | 16 | Application.Initialize; | 
|---|
|  | 17 | Application.CreateForm(TfrmVA508JawsDispatcherHiddenWindow, frmVA508JawsDispatcherHiddenWindow); | 
|---|
|  | 18 | Application.Run; | 
|---|
|  | 19 | end. | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.