RPC HELP SplVista Splasch Example

From VistApedia
Jump to: navigation, search

RPC Broker Help Home

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.