Subversion Repositories spacemission

Rev

Rev 97 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. unit LevSplash;
  2.  
  3. interface
  4.  
  5. uses
  6.   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  7.   jpeg, ExtCtrls, StdCtrls, Vcl.Imaging.pngimage;
  8.  
  9. type
  10.   TSplashForm = class(TForm)
  11.     SplashImage: TImage;
  12.     v: TLabel;
  13.     Label1: TLabel;
  14.   end;
  15.  
  16. var
  17.   SplashForm: TSplashForm;                      
  18.  
  19. implementation
  20.  
  21. uses
  22.   LevMain;
  23.  
  24. {$R *.DFM}
  25.  
  26. end.
  27.  
  28.