RPC HELP SplVista Splasch Example
From VistApedia
VistA Splash Screen Example
The following is example of displaying the VistA Splash Screen in an application:
uses Forms, Unit1 in 'Unit1.pas', SplVista; {$R *.RES} begin Application.Initialize; Application.CreateForm(TForm1, Form1); SplashOpen; SplashClose(2000); Application.Run; end.
NOTE: For a demonstration using the VistA Splash Screen, please run the BrokerExample.EXE located in the ..\BDK32\Samples\BrokerEx directory.