psdemo.dpr

免费控件PicShow的最新版本

program PSDemo;

uses
  Forms,
  Main in 'Main.pas' {MainForm},
  Splash in 'Splash.pas' {SplashForm};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'TPicShow Demo';
  with TSplashForm.Execute do
    try
      Application.CreateForm(TMainForm, MainForm);
    finally
      Free;
    end;
  Application.Run;
end.