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.

Ich habe dazu den Code hier geschrieben...die schowmessage ist nur zur überprüfung da...

zusammenfalten · markieren

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

TICQClient Kontakliste Probleme

TICQClient Kontakliste Probleme

Forumregeln