u_splash.pas

   1 unit u_splash;
   2
   3 {$mode objfpc}{$H+}
   4
   5 interface
   6
   7 uses
   8   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
   9   ExtCtrls;
  10
  11 type
  12
  13   { TfSplash }
  14
  15   TfSplash = class(TForm)
  16     Label1: TLabel;
  17
  18   private
  19     { private declarations }
  20   public
  21     { public declarations }
  22   end;
  23
  24 var
  25   fSplash: TfSplash;
  26
  27 implementation
  28
  29 {$R *.lfm}
  30
  31 { TfSplash }
  32
  33
  34
  35 end.
  36