serverproject.dpr

来自「序采用网上介绍的方法实现最基本的P2P方式通讯.模拟实现即时消息互发. 2.P」· DPR 代码 · 共 15 行

program ServerProject;

uses
  Forms,
  MainUnit in 'MainUnit.pas' {Server},
  testQQCommon in '../Common/testQQCommon.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TServer, Server);
  Application.Run;
end.