pserver.dpr

来自「delphi中的SOCKET使用的简单程序」· DPR 代码 · 共 15 行

program PServer;

uses
  Forms,
  uSrMain in 'uSrMain.pas' {fmServer},
  uSocketPub in '..\Client\uSocketPub.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TfmServer, fmServer);
  Application.Run;
end.