appserver.dpr

来自「Delphi快速开发Web Server」· DPR 代码 · 共 22 行

program AppServer;

{$include rtcDeploy.inc}

uses
{$ifdef rtcDeploy}
  FastMM4,
  FastMove,
{$endif}
  Forms,
  Server_Form in 'Server_Form.pas' {Form1},
  AppServer_Module in 'AppServer_Module.pas' {AppSrv_Module: TDataModule};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TAppSrv_Module, AppSrv_Module);
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.