simelavotor.dpr

某国际贸易中心共40层

program SimElavotor;

uses
  Forms,
  Setupin in 'Setupin.pas' {setupForm},
  main in 'main.pas' {mainform},
  Define in 'Define.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(Tmainform, mainform);
  Application.CreateForm(TsetupForm, setupForm);
  setupform.ShowModal;
  Application.Run;
end.