In der Hilfe der Komponente ist es so beschrieben:

OnServerListRecv(Sender: TObject; SrvContactList: TList)

A response to RequestContactList procedure.
After using the SrvContactList you *must* call DestroyUINList procedure with SrvContactList as a parameter, required to free allocated data, otherwise you'll have memory leaks. Each SrvContactList is a pointer on a TUINEntry stucture (declared in ICQClient.pas). 

  TUINEntry = record
    UIN: LongWord;            //UIN in contact list
    Nick: ShortString;        //Nick of this UIN, can be null(empty)
    CType: Word;              //Type, can be U_NORMAL(Normal contact list entry), U_VISIBLE_LIST(user is in visible list)
                              //, U_INVISIBLE_LIST(user is in invisible list), U_IGNORE_LIST(user is in ignore list)
    CGroupID: Word;           //Group's ID user belongs to
    CTag: Word;               //ID of the user
    CGroup: ShortString;      //Group name, UIN belongs to
  end;

  Example:
  procedure TMainForm.ICQClient1ServerListRecv(Sender: TObject;
    SrvContactList: TList);
  var
    i: Word;
    UserInfo: TUINEntry;
  begin
     if SrvContactList.Count > 0 then
       for i := 0 to SrvContactList.Count - 1 do
       begin
         UserInfo := PUINEntry(SrvContactList.Items[i])^;
         Memo1.Lines.Add(UserInfo.Nick + ' is in group ' + UserInfo.CGroup
           + ' and his uin is ' + IntToStr(UserInfo.UIN));
       end;
     ICQClient1.DestroyUINList(SrvContactList);
  end;

Ich habe das jetzt mal versuch in CB6 zu übersetzen.

void __fastcall TForm1::icqServerListRecv(TObject *Sender,
      TList *SrvContactList)
{
Memo1->Lines->Add("Kontaktliste anfordern...");

TUINEntry test;
 LongWord UIN;
}

Weiter bin ich leider noch nicht gekommen

Außedem kann ich der Komponente nicht die UIN zuweisen:

[C++ Error] Unit1.cpp(38): E2015 Ambiguity between '_fastcall Sysutils::StrToInt(const System::AnsiString)' and '_fastcall Icqworks::StrToInt(const System::AnsiString)'

Gibt es hier vielleicht Jemanden, der mir helfen kann? Wäre echt super!! Danke!!!

ListBox1->Items->Add(SrvContactList->Count);

Raus kommt "17"

ListBox1->Items->Add(SrvContactList->Items[0]);

da meint er:

[C++ Error] Unit1.cpp(36): E2034 Cannot convert 'void *' to 'AnsiString'

Hier geht es ja auch, nur weiß ich nicht wie ich

UserInfo := PUINEntry

auf den Builder übertragen kann.

UserInfo = PUINEntry(SrvContactList.Items[i]);

bist du wahrscheinlich schon selbst gekommen... was kommt denn da für ne Meldung?

E2451 Undefined symbol 'UserInfo'
E2294 Structure required on left side of . or .*

Das heißt ich muss "UserInfo" deklarieren aber wie??

Vielleicht mit

PUINEntry UserInfo;

das funktioniert, aber wie dann weiter?

TUINEntry

Und dann halt

UserInfo = PUINEntry(SrvContactList->Items[i]);

Schon ein wenig scheiße, dass du der einzige bist, der das teste kann...

Scheiss Delphi ^^

Hier der Link zur Komponente: (ist ganz einfach zu bedienen nur halt dieses dumme anfordern der ContactList)

http://prdownloads.sourceforge.net/ticqlib/icq_20040630.zip?download

TUINEntry UserInfo = PUINEntry(SrvContactList->Items[0]);

E2034 Cannot convert 'TUINEntry *' to 'TUINEntry'

Also ihrgendwie muss das schon stimmen hmm...

so gehts auch net und andersrum auch net... verstehe das nicht kennt sich denn hier keine mit Delphi aus?

TUINEntry *UserInfo;

Probier mal.

TUINEntry *UserInfo;
int clcount = SrvContactList->Count;
int i = 0;

while (i < clcount)
{
UserInfo = PUINEntry (SrvContactList->Items[i]);
ListBox1->Items->Add(UserInfo->Nick);
i++;
}

Aber ich kann immernoch nicht

StrToInt

verwenden