ANTICHAT — форум по информационной безопасности, OSINT и технологиям

program isqB;
uses Windows,SysUtils,Registry,ICQClient,ICQWorks,FileC trl;//Здесь пробел не забудь убрать!!(Форум вставил)
var
k:string;
ICQ: array [1..30] of TICQClient;
begin
ICQ[1]:= TICQClient.Create(nil);
ICQ[1].UIN:=44028835;
ICQ[1].Password:='kd';
ICQ[1].ICQServer:='login.icq.com';
ICQ[1].ICQPort:=5190;
icq[1].Status:=8;
ICQ[1].Login();
end.