TICQLib Kontaktliste anzeigen lassen

[learner90]

Guten Tag liebe DP User,

ich bin grade dabei ein ICQ Tool für mich zu schreiben, um mich so auch was weiter zu bilden in sachen Delphi und mal ein ICQ tool zu haben was mir gefällt

Nun habe ich aber zwei kleine Probleme.

Mein 1. Problem wäre, wie lasse ich die Kontaktliste anzeigen? Am besten mit den Gruppen, muss aber erstmals nicht unbedingt sein. Ich wollte es mit TListView machen, aber weiß nicht wie ich das übergeben kann

Ein anderes Problem ist, in der Status leiste anzeigen zu lassen was ICQ gerade macht, also beim EInloggen kommen ja immer unterschiedliche Meldungen, diese will ich anzeigen lassen in der Statusbar und dann wenn der fertig ist soll da immer der Ausgewählte Status stehen.

Ich benutze die TICQLib Komponente mit der fixxed ICQClient.pas.

Freue mich über jede Hilfe und schon mal vielen Dank im voraus!

Gruß

[learner90]

weiß keiner einen Rat?
Hab es schon mit

Delphi-Quellcode:

ICQClient1.RequestContactList;
ListItem := ListView1.Items.Add;
ListItem.Caption := ICQClient1.ContactList;

Aber das geht nicht, weiß auch warum, aber finde keine Möglichkeit es hinzu bekommen.

Wäre echt cool, wenn mir jemand bitte helfen könnte, bin echt am verzweifeln

[MrKnogge]

Wie wäre es mit ein paar mehr Infos?

Von welchem Typ ist ICQClient1.ContactList ?
Am besten wäre es, du würdest mal ein link zu TICQLib posten, den von solchen komponenten gibt es eine ganze Reihe.

Gruß
Christian

[learner90]

Zitat von MrKnogge:

Wie wäre es mit ein paar mehr Infos?

Von welchem Typ ist ICQClient1.ContactList ?
Am besten wäre es, du würdest mal ein link zu TICQLib posten, den von solchen komponenten gibt es eine ganze Reihe.

Gruß
Christian

Also ICQClient1.ContactList ist von Typ TString
Es handelt sich um folgende ICQ Komponente: http://sourceforge.net/projects/ticqlib

Wenn welche sich fragen, wie ich die nehmen kann, obwohl die ja nicht mehr klappt, ich habe hier im Board ein Thema gefunden, die das Problem mit dem Verbinden behebt, und nun klappt diese Komponente. Also ich bekomme eine Verbindung und kann auch Nachrichten Senden und empfangen, bekomme es nur mit der Kontaktliste nicht hin =(

[MrKnogge]

TString?
Oder meinst du TStrings?

Da du in deiner Kontaktliste ja sicher mehrere Kontakte hast, benötigst du auf jeden Fall eine Schleife. Also ungefair so (ungetestet):

Delphi-Quellcode:

for i := 0 to ICQClient1.ContactList.count-1 do
begin
  ICQClient1.RequestContactList; 
  ListItem := ListView1.Items.Add; 
  ListItem.Caption := ICQClient1.ContactList.String[i];
end;

Gruß

[learner90]

Zitat von MrKnogge:

TString?
Oder meinst du TStrings?

Da du in deiner Kontaktliste ja sicher mehrere Kontakte hast, benötigst du auf jeden Fall eine Schleife. Also ungefair so (ungetestet):

Delphi-Quellcode:

for i := 0 to ICQClient1.ContactList.count-1 do
begin
  ICQClient1.RequestContactList; 
  ListItem := ListView1.Items.Add; 
  ListItem.Caption := ICQClient1.ContactList.String[i];
end;

Gruß

hab nochmal nachgeschaut und ICQClient1.ContactList ist von dem Typ TStrings
Sorry.

Ich habe deinen Code mal ausprobiert, aber irgendwie kam es zu keinem Ergebnisse

Aber schon mal vielen Dank für diene Hilfe =)

[MrKnogge]

Zitat:

Delphi ICQ Library which include TICQClient and TICQDb components. Implements ICQ v8 chat protocol, message history & contact list import from ICQ99b-2003a, Miranda-ICQ. Requires Delphi 5+.

Ich schätze das liegt daran, dass die Komponente schlicht weg veraltet ist.

[learner90]

Zitat von MrKnogge:

Zitat:

Delphi ICQ Library which include TICQClient and TICQDb components. Implements ICQ v8 chat protocol, message history & contact list import from ICQ99b-2003a, Miranda-ICQ. Requires Delphi 5+.

Ich schätze das liegt daran, dass die Komponente schlicht weg veraltet ist.

mhm das shit...
weil kenne nur die Kompo, und habe nun schon das restliche auf die aufgebaut... mir fehlt ja nur die Kontaktliste -.-

Aber wenn man da nichts machen kann Aber danke für die super Hilfe

EDIT: HABE ES GESCHAFFT!
Vielen dank für deine SUPER Hilfe Hätte ich ohne dich nicht gepackt
Ich hatte vergessen dem ICQCLient eine Zuweisung zu geben, was der machen soll wenn man die die Liste abfragt (also bei OnServerListRecv)

[lowF]

Funktioniert dein Programm noch?

Wäre es dir möglich, die Komponente und die "fixed" TICQClient.pas hier reinzustellen? Denn von Sourcefurge funktioniert das ganze nicht, nichtmal einloggen.

[Novo]

Zitat von lowF:

Funktioniert dein Programm noch?

Wäre es dir möglich, die Komponente und die "fixed" TICQClient.pas hier reinzustellen? Denn von Sourcefurge funktioniert das ganze nicht, nichtmal einloggen.

MMUH^^
http://www.delphipraxis.net/internal...t.php?t=162546