choujiang.dpr

来自「一个动画抽奖程序」· DPR 代码 · 共 24 行

program ChouJiang;

uses
  Forms,
  MainUI in 'MainUI.pas' {frmMain},
  sEdit in 'sEdit.pas' {frmEdit},
  sDm in 'sDm.pas' {DM: TDataModule},
  sPublic in 'sPublic.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '抽奖程序';
  try
    Application.CreateForm(TDM, DM);
    Application.CreateForm(TfrmMain, frmMain);
    Application.CreateForm(TfrmEdit, frmEdit);
  except
  end;
  Application.Run;
end.