16 lines
330 B
ObjectPascal
16 lines
330 B
ObjectPascal
|
program HTTPChatClient;
|
||
|
|
|
||
|
|
uses
|
||
|
|
uROComInit,
|
||
|
|
Forms,
|
||
|
|
HTTPChatClientMain in 'HTTPChatClientMain.pas' {HTTPChatClientMainForm};
|
||
|
|
|
||
|
|
{$R *.res}
|
||
|
|
|
||
|
|
begin
|
||
|
|
Application.Initialize;
|
||
|
|
Application.Title := 'HTTP Chat Client';
|
||
|
|
Application.CreateForm(THTTPChatClientMainForm, HTTPChatClientMainForm);
|
||
|
|
Application.Run;
|
||
|
|
end.
|