chat.dpr

来自「网络聊天的一个小」· DPR 代码 · 共 19 行

program Chat;

uses
  Forms,
  main in 'main.pas' {ChatForm},
  about in 'about.pas' {AboutBox};


{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'MagicMouse Chatting Room';
  AApplication.CreateForm(TChatForm, ChatForm);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.CreateForm(TForm1, Form1);
  pplication.Run;
end.