ICQ Status...mal wieder^^

[F0rc3]

TICQLib ist eine Komponente um einen ICQ-Client zu programmieren (http://sourceforge.net/projects/ticqlib)

Um den Status abzufragen müsste eigentlich folgendes gehen:

Delphi-Quellcode:

procedure TForm1.ICQClient1Login(Sender: TObject);
begin
icqclient1.AddContact(000000000); // Deine Nummer
end;


procedure TForm2.ICQClient1OnlineInfo(Sender: TObject; UIN: string; Port: Word;
  InternalIP, ExternalIP: string; OnlineTime: TDateTime; Idle: Word; ICQVersion,
  MirandaVersion: Cardinal; ProtoVer, UserCaps: Byte);
begin
if UIN='000000000' then showmessage('online');
end;

procedure TForm2.ICQClient1UserOffline(Sender: TObject; UIN: string);
begin
if UIN='000000000' then showmessage('offline');
end;