multichat.dpr

来自「一个支持多用在线聊天的工具」· DPR 代码 · 共 14 行

program MultiChat;

uses
  Forms,
  ServerUnit in 'ServerUnit.pas' {ChatServer};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TChatServer, ChatServer);
  Application.Run;
end.