lucky.dpr

来自「该组件的精度有限」· DPR 代码 · 共 27 行

program lucky;

uses
  Forms,
  LUCKPAS in 'LUCKPAS.PAS' {Mainform},
  dbfmd in '..\彩票旋转矩阵过滤程序\dbfmd.pas' {DBF: TDataModule},
  myabout1 in '..\彩票旋转矩阵过滤程序\myabout1.pas' {myabout},
  repair in '..\彩票旋转矩阵过滤程序\repair.pas' {form1},
  labout in '..\彩票旋转矩阵过滤程序\labout.pas' {SplashForm};

{$R *.RES}

begin
 Application.Initialize;
  Application.Title := '彩票分析 1.2';
  SplashForm := TSplashForm.Create(Application);
  SplashForm.Show;
  SplashForm.Update;
  Application.CreateForm(TDBF, DBF);
  Application.CreateForm(TMainform, Mainform);
  Application.CreateForm(Tmyabout, myabout);
  Application.CreateForm(Tform1, form1);
  //  SplashForm.hide;
 // splashform.free;
  Application.Run;
end.