gd_chain_server.dpr

delphi的一个开发实例

program GD_Chain_Server;

uses
  Forms,
  Chain_Server_Main in 'Chain_Server_Main.pas' {frm_Chain_Server_Main},
  Server_Connect in 'Server_Connect.pas' {frm_Server_Connect},
  GD_Chain_Server_TLB in 'GD_Chain_Server_TLB.pas',
  func in 'func.pas',
  Server_Data in 'Server_Data.pas' {Easy_Dcom_Server: TRemoteDataModule} {Easy_Dcom_Server: CoClass},
  Chain_Data in 'Chain_Data.pas' {frm_Chain_Data: TDataModule},
  frm_Public_Func in 'frm_Public_Func.pas';

{$R *.TLB}

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tfrm_Chain_Server_Main, frm_Chain_Server_Main);
  Application.CreateForm(Tfrm_Server_Connect, frm_Server_Connect);
  Application.CreateForm(Tfrm_Chain_Data, frm_Chain_Data);
  Application.Run;
end.