delrock.dpr

来自「source a top program in delphi.」· DPR 代码 · 共 22 行

program DelRock;

uses
  Forms,
  SysUtils,
  Controls,
  DRockU in 'DRockU.pas' {AsteroidForm},
  Trigu in 'Trigu.pas';

{$R *.RES}

begin
  {let's show our splash screen}
  {keep it on the screen for a few seconds}
  Screen.Cursor := crHourglass;
  Application.processmessages;
  Screen.Cursor := crDefault;
  Application.Title := 'Delphi ROCKS!';
  Application.CreateForm(TAsteroidForm, AsteroidForm);
  Application.Run;
end.