TICQClient Kontakliste Probleme

[LoW_FloW]

Bei mir empfängt die ICQClient Komponente irgendwie nicht die Kontaktliste. Richtig eingeloggt bin ich auf jeden Fall und eine Kontaktliste, die abgerufen werden kann ist auch vorhanden. :gruebel: Ich habe dazu den Code hier geschrieben...die schowmessage ist nur zur überprüfung da...

Delphi-Quellcode:

procedure TfrmRustCQ.ICQClient1ContactListRecv(Sender: TObject;
  UIN: String; ContactList: TStringList);
var
  i: Word;
  UserInfo: TUINEntry;
begin
  ShowMessage('Kontaktliste kommt!');
  if ContactList.Count > 0 then
    for i := 0 to ContactList.Count - 1 do
    begin
      UserInfo := PUINEntry(ContactList.Strings[i])^;
      KontaktMemo.Lines.Add('Nick: '+UserInfo.Nick +' | UIN: ' +
                            IntToStr(UserInfo.UIN));
    end;
end;

Ist die komponente vielleicht zu alt? Ich benutzte den "TICQClient v1.21", den es bei cobans.net gibt. Wäre schön, wenn ihr mir helfen könntet :???: