00_server.dpr

利用TCP协议连接双方

program Server;

uses
  Forms,
  U_Server in 'U_Server.pas' {frm_Server};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tfrm_Server, frm_Server);
  Application.Run;
end.