home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / zkuste / delphi / kompon / d3456 / PICSHOW.ZIP / Demo / PSDemo.dpr < prev    next >
Text File  |  2002-10-25  |  313b  |  20 lines
  1. program PSDemo;
  2.  
  3. uses
  4.   Forms,
  5.   Main in 'Main.pas' {MainForm},
  6.   Splash in 'Splash.pas' {SplashForm};
  7.  
  8. {$R *.RES}
  9.  
  10. begin
  11.   Application.Initialize;
  12.   with TSplashForm.Execute do
  13.     try
  14.       Application.CreateForm(TMainForm, MainForm);
  15.     finally
  16.       Free;
  17.     end;
  18.   Application.Run;
  19. end.
  20.