skyeditor.dpr

来自「本系统在一些大中型企业(跨多达24个区域)一直都在很好的服务过」· DPR 代码 · 共 33 行

program SkyEditor;

uses 
  Forms,
  REAbout in 'REABOUT.PAS' {AboutBox},
  REMain1 in 'REMain1.pas' {MainForm},
  SplashForm in 'SplashForm.pas' {FrmSplash},
  newunit in 'newunit.pas' {typeform},
  sendUnit in 'sendUnit.pas' {Dform},
  zbsunit in 'zbsunit.pas' {zbsform},
  handUnit in 'handUnit.pas' {handForm};

{$R *.RES}

begin
FrmSplash := TFrmSplash.Create( Application );
  try
    FrmSplash.Show;
    FrmSplash.Update;       { Handle any Pending Paint Messages }

  Application.Title := '@NewStar通用文档资料编辑器-(客户\服务器)';

  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(Ttypeform, typeform);
  Application.CreateForm(TDform, Dform);
  Application.CreateForm(Tzbsform, zbsform);
  Application.CreateForm(ThandForm, handForm);
  finally
    FrmSplash.Free;
  end;
  Application.Run;
end.