neticq.dpr

来自「这是一个可以在小局域网内聊天的小工具」· DPR 代码 · 共 19 行

program NetICQ;

uses
  Forms,
  main in 'main.pas' {MainForm},
  ReceivedUnit in 'ReceivedUnit.pas' {ReceivedMsgForm},
  ChatRoomUnit in 'ChatRoomUnit.pas' {ChatRoomForm},
  NickNameUnit in 'NickNameUnit.pas' {NickNameForm};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'NetICQ V1.0';
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
end.