source: cprs/branches/GUI-config/BDK32/Samples/SharedRPCBroker/BrokerEx/BrokerExample.dpr@ 1641

Last change on this file since 1641 was 476, checked in by Kevin Toppenberg, 16 years ago

New WorldVistA Config Utility

File size: 560 bytes
RevLine 
[476]1program BrokerExample;
2
3uses
4 Forms,
5 fBrokerExample in 'fBrokerExample.pas' {frmBrokerExample},
6 SplVista,
7 fSgnonDlg in '..\..\Source\fSgnonDlg.pas' {frmSignonDialog};
8
9// include to display Vista splash
10
11{$R *.RES}
12
13begin
14 Application.CreateForm(TfrmBrokerExample, frmBrokerExample);
15 Application.CreateForm(TfrmSignonDialog, frmSignonDialog);
16 SplashOpen; // display splash screen
17 SplashClose(3000); // min splash time 3 seconds, then close
18 Application.Run;
19end.
Note: See TracBrowser for help on using the repository browser.