tcpclient.dpr

来自「delphi开发的基于 gprsd数据采集程序」· DPR 代码 · 共 26 行

program TcpClient;

uses
  ExceptionLog,
  Forms,
  Unit1 in 'Unit1.pas' {MainForm},
  term in 'term.pas',
  record_define in 'record_define.pas',
  TcpMod in 'TcpMod.pas' {TcpModule: TDataModule},
  TermSet in 'TermSet.pas',
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3},
  Gprs_Interface in 'OPC_GPRS\Gprs_Interface.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TTcpModule, TcpModule);
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TForm2, Form2);
  //Application.CreateForm(TForm3, Form3);
  Application.ShowMainForm:=false;
  Application.Run;
end.