AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi (IdIRC) Nachrichten des aktuellen Channels erhalten ?
Thema durchsuchen
Ansicht
Themen-Optionen

(IdIRC) Nachrichten des aktuellen Channels erhalten ?

Ein Thema von Äfan · begonnen am 22. Mai 2005 · letzter Beitrag vom 23. Mai 2005
Antwort Antwort
Seite 2 von 3     12 3      
Äfan
(Gast)

n/a Beiträge
 
#11

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 16:58
Na dann geht aber nix mehr

Ich geb dir mal den ganzen code, sonst wird das glaube ich nix... Ahja das mit der userliste geht auch net ...

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
IdIRC1.Nick := 'Testuser';
IdIRC1.Host := 'irc.*****.com';
IdIRC1.Port := 6667;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
IdIRC1.Connect();
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
IdIRC1.Join('#test');
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  IdIRC1.Say('#test',Edit1.Text);
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
  IdIRC1.Quit('Haut mal ab');
end;

procedure TForm1.Button5Click(Sender: TObject);
begin
 idirc1.Disconnect;
end;



procedure TForm1.IdIRC1Message(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel; Content: String);
begin
  RichEdit1.Lines.Add('[' + AUser.Nick + ']: ' + Content);
end;


procedure TForm1.IdIRC1Send(Sender: TObject; ACommand: String);
begin
  RichEdit1.Lines.Add(ACommand);
end;



procedure TForm1.IdIRC1Join(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel);
var
 i:integer;
begin
  for i := 0 to IdIRC1.Users.Count do
   begin
   ListBox1.Items.Add(AUser.Nick);
  end;
end;

procedure TForm1.IdIRC1Receive(Sender: TObject; ACommand: String);
begin
  RichEdit1.Lines.Add(Acommand)
end;
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#12

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 17:03
Wenn du diese Zeile entfernst

RichEdit1.Lines.Add(Acommand) und neu kompilierst, sollte dies ganze Proedur entfernt werden. Sie hat keinen Einfluss auf das eigentliche chatten.
  Mit Zitat antworten Zitat
Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#13

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 17:03
Zitat von Äfan:
Na dann geht aber nix mehr

Ich geb dir mal den ganzen code, sonst wird das glaube ich nix... Ahja das mit der userliste geht auch net ...

Delphi-Quellcode:
procedure TForm1.IdIRC1Message(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel; Content: String);
begin
  RichEdit1.Lines.Add('[' + AUser.Nick + ']: ' + Content);
end;

procedure TForm1.IdIRC1Receive(Sender: TObject; ACommand: String);
begin
  RichEdit1.Lines.Add(Acommand) //das wegmachen, hier ist der "Fehler"
end;
Fällt dir was auf? Die zweite Prozedur schickt diese "seltsamen Nachrichten" an dein Richedit. Einfach die mit Kommentaren markierte Zeile entfernen.
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#14

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 17:52
Ok funktioniert einwandfrei, bloß hab ich noch fragen:

1. Wie zeige ich jetzt den willkommenstext des server ?
2. Wie mache ich das mit den Formatierungen des Chats, also wenn ich nen text im chat farbig oder fett mache, dass dies auch so in meinem Chat erscheint ? Müsste ja gehen, habe ja ne richedit.
3. Wie mache ich die Userliste ? Mein versuch steht ja da oben im code.
  Mit Zitat antworten Zitat
Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#15

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 17:59
Delphi-Quellcode:
procedure TForm1.IdIRC1Join(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel);
var
i:integer;
begin
  for i := 0 to IdIRC1.Users.Count do
   begin
   ListBox1.Items.Add(AUser.Nick);
  end;
end;
Ich kenne die IdIRC Kompo zwar nicht auswendig, aber ich vermute, es muss mehr in dem Stil sein:

Delphi-Quellcode:
...
ListBox1.Items.Add(IdIRC1.Users[i].Nick);
...
Andernfalls addest du ja ständig den selben Namen

air
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#16

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 18:37
Ne, geht net
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#17

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 18:47
Zitat von Äfan:
Ne, geht net
Mein Auto fährt auch nicht...


Was geht nicht? Fehlermeldung?
  Mit Zitat antworten Zitat
Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#18

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 18:56
Mal ganz davon ab, dass Spider recht hat, solltest du jedoch für jede Frage einen neuen Thread eröffnen.
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#19

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 18:57
Eine seite davor steht was ich will und was nicht geht is das:

Zitat von Airblader:
Delphi-Quellcode:
procedure TForm1.IdIRC1Join(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel);
var
i:integer;
begin
  for i := 0 to IdIRC1.Users.Count do
   begin
   ListBox1.Items.Add(AUser.Nick);
  end;
end;
Ich kenne die IdIRC Kompo zwar nicht auswendig, aber ich vermute, es muss mehr in dem Stil sein:

Delphi-Quellcode:
...
ListBox1.Items.Add(IdIRC1.Users[i].Nick);
...
Andernfalls addest du ja ständig den selben Namen

air
  Mit Zitat antworten Zitat
Spoon

Registriert seit: 26. Apr 2003
39 Beiträge
 
#20

Re: (IdIRC) Nachrichten des aktuellen Channels erhalten ?

  Alt 22. Mai 2005, 20:08
Um genau zu sein ist es:

ListBox1.Items.Add(IdIRC1.Users.Items[i].Nick);
MfG
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 3     12 3      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:54 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz