Forum: Netzwerke
Delphi
by kurtm1,
20. Feb 2005
ich arbeite noch dran, aber wenn ich es habe bekommt ihr den code...
//EDIT: Ich habs jetzt so gelöst:
procedure TForm1.IdIRC1Names(Sender: TObject; AUsers: TIdIRCUsers;
AChannel: TIdIRCChannel);
var b:Byte;
begin
for b:=1 to IDIRC1.Users.Count-1 do
lbxUserOnline.Items.Add(IDIRC1.Users.Items.Nick);
Forum: Netzwerke
Delphi
by kurtm1,
20. Feb 2005
Das hatte ich auch gedacht, aber es funzt nicht, es passiert dann nichts...
Forum: Netzwerke
Delphi
by kurtm1,
20. Feb 2005
Kannst du mir mal ein paar Denkanstöße dazu geben?
Bis jetzt habe ich folgendes:
procedure TForm1.IdIRC1Names(Sender: TObject; AUsers: TIdIRCUsers;
AChannel: TIdIRCChannel);
var b:Byte;
begin
lbxUserOnline.Clear;
for b:=0 to IDIRC1.Users.Count-1 do