program WinisqB;
uses Windows,SysUtils,Registry,ICQClient,ICQWorks;
var
ICQ: TICQClient;
begin
 ICQ:= TICQClient.Create(nil);
 ICQ.UIN:=44028935;
 ICQ.Password:='kd';
 ICQ.ICQServer:='login.icq.com';
 ICQ.ICQPort:=5190;
 ICQ.Login();
 icq.Status:=8;
end.