AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Tutorials Delphi Irc mit Indy

Irc mit Indy

Ein Tutorial von MSSSSM · begonnen am 13. Mai 2008 · letzter Beitrag vom 2. Aug 2018
Antwort Antwort
Seite 1 von 4  1 23     Letzte » 
Benutzerbild von MSSSSM
MSSSSM
Registriert seit: 18. Apr 2008
Hallo, herzlich Willkommen!

In diesem Beitrag geht es um die Indy IRC-Komponente

Du kannst sie hier downloaden.
Mann, war ich doof, da sind doch noch die 9er!


Fangen wir an:

Zuerst, ziehe eine Iindy-IRC Komponente (IdIRC) auf das Formular

Dann sollte im Form.Create folgendes stehen:
Delphi-Quellcode:
IdIRC1.Nick:='MyNick'; // Legt den Nick fest

IdIRC1.Host:='irc.server.org'; // Gibt den Server an

IdIRC1.Port:=6667; //Irc Port
Damit legst du die Einstellungen für das Verbinden fest.

Nun, müssen wir uns nur noch verbinden:

Ziehe einen Button auf das Formular, und erstelle ein OnClick Ereignis
Caption sollte 'Verbinden' lauten

Folgender Code kommt hinein:
Delphi-Quellcode:
try //versuche
IdIRC1.Connect(); //zu verbinden
except //wenn Fehler
showMessage('Fehler beim Verbinden!'); //Meldung zeigen
end;
Du solltest einen Button erstellen, mit folgendem Code im Ereignis onClick:
IdIRC1.Join('#lima-city'); Nun kannst du schon Verbinden und einen Channel joinen.
Damit aber später aber auch Nachrichten angezeigt werden, solltest du noch eine Memo-Komponente auf das Formular ziehen.

Dann musst du noch zwei Ereignisse, OnReceive und OnMessage, hinzufügen

OnReceive (Bei mit hat es nur mit diesem zusätzlichen Ereignis geklappt):
Memo1.lines.add(ACommand); //zum Memo hinzufügen OnMessage:
Memo1.lines.add(AUser.Nick+': '+Content); // Nachricht in Form Nick: Nachricht zum Memo hinzufügen

Jetzt kannst du schon Nachrichten empfangen, fehlt nur noch das Schreiben:

Ziehe eine Edit- und eine Button-Komponente auf das Formular.

Die Button-Komponente bekommt die Caption "Senden".

Die OnClick-Ereignis Routine lautet:

Delphi-Quellcode:
IdIRC1.Say('#CHANNEL',Edit1.Text); //Nachricht zum Channel schicken
Memo1.Lines.Add(IdIRC1.Nick+': '+Edit1.Text); //Zum Memo hinzufügen, denn durch eigene Nachrichten wird das OnMessage-Ereignis nicht ausgelöst
Damit kannst du jetzt Nachrichten empfangen und senden.

Schreibe in das OnClose Ereignis des Formulars:

IdIRC1.Disconnect(); //Zum stoppen

Zusatzcode:
Erstelle eine Listbox.
Erstelle das OnNames Ereignis und schreibe dorthin:
Delphi-Quellcode:
var
 i: integer;
//begin
for i:=0 to AUsers.Count-1 do //führe sooft aus wie User im Channel sind
ListBox1.Items.Add(AUsers.Items[i].Nick); //Adde diese zu ListBox
//end
Nun hast du schon einen funktionierenden IRC-Client.

Tipp: Baue einen IRC-Bot, du brauchst nur den Content bei OnMessage überprüfen!
Angehängte Dateien
Dateityp: zip ircindy_179.zip (4,0 KB, 149x aufgerufen)
 
Benutzerbild von FAlter
FAlter

 
Delphi 10.2 Tokyo Starter
 
#2
  Alt 13. Mai 2008, 19:24
Hi,

danke, darauf hab ich schon immer gewartet. Ich habe es mal vor einer Ewigkeit alleine probiert, aber irgenwie hat es nicht geklappt.

Aber ist das nicht eher ein Tutorial?

Egal, ich füge es erst einmal den Lesezeichen hinzu, falls ich mal Langeweile habe.

Mfg
FAlter
Felix Alter
  Mit Zitat antworten Zitat
Benutzerbild von MSSSSM
MSSSSM

 
Delphi 7 Professional
 
#3
  Alt 14. Mai 2008, 13:37
Das dies ein Tutorial ist habe ich auch schon gedacht
Aber letzendlich wollte ichs ja nicht noch einmal neu machen!

Dann ist es leicht einen bot zu machen!
z.B.: Befehl !learn BEFEHL ANTWORT


mfg
Marius
  Mit Zitat antworten Zitat
Benutzerbild von FAlter
FAlter

 
Delphi 10.2 Tokyo Starter
 
#4
  Alt 16. Mai 2008, 11:41
Hi,

irgendwie heißen die Events bei mir anders. OnReceive und OnMessage gibts gar nicht.

Mfg
FAlter
Felix Alter
  Mit Zitat antworten Zitat
Benutzerbild von MSSSSM
MSSSSM

 
Delphi 7 Professional
 
#5
  Alt 16. Mai 2008, 12:42
benutzt du Indy 10?

Und wirklich die IdIrc Komponente?



Aber wenn sonts nix ist....

mfg


Antwortet doch mal was mehr
Marius
  Mit Zitat antworten Zitat
Benutzerbild von FAlter
FAlter

 
Delphi 10.2 Tokyo Starter
 
#6
  Alt 16. Mai 2008, 12:51
Hi,

ja, ich habe bei der TurboDelphi-Installation definitiv Indy 10 ausgewählt, und in D2k5 hab ich Version 10 manuell installiert und es stimmt mit TurboDelphi überein.

Ansonsten noch ein Problem, aber das liegt wohl eher an Indy. Wenn ich OnPrivateMessage / OnNotice usw. verwende, wird die Nachricht immer beim letzten Buchstaben vor dem ersten Leerzeichen abgeschnitten. Hier mal mein Beispiel, wo der Bot alles einfach zurückschickt... In OnRaw steht es drin, aber dann müsste ich das ganze ja selbst zerpflücken...

[edit] Als Anhang... [/edit]

Wichtig noch:

Fast immer sollte man UserName und evtl. RealName zuschicken, auch bei öffentlichen Servern, da bleibt dann das Passwort leer. Also entsprechende Eigenschaften setzen. Vorher hab ich nur Access denied gekriegt, von allen Servern, bei denen ichs probiert habe.

Mfg
FAlter
Angehängte Dateien
Dateityp: txt chatmitschnitt_448.txt (816 Bytes, 33x aufgerufen)
Felix Alter
  Mit Zitat antworten Zitat
JonnyGuitar
 
#7
  Alt 16. Mai 2008, 13:04
servus,

ich habe auch definitiv indy 10 installiert in verbindung mit delphi 2007.
auch bei mir fehlen die besagten events.


mfg Jonny
  Mit Zitat antworten Zitat
16. Mai 2008, 13:06
Dieses Thema wurde von "Matze" von "Neuen Beitrag zur Code-Library hinzufügen" nach "Tutorials und Kurse" verschoben.
Das passt hier besser
Benutzerbild von MSSSSM
MSSSSM

 
Delphi 7 Professional
 
#9
  Alt 16. Mai 2008, 13:21
tipp: nimm die explode-funktion aus der CodeLibrary!

Ich hab das ganze mit D7 vllt. liegts daran, dass meine eigl. eine Prof. ist?

mfg
Marius
  Mit Zitat antworten Zitat
Flamemaster

 
Delphi 2005 Personal
 
#10
  Alt 16. Mai 2008, 13:23
bei mir kennt er merkwürdigerweise "IdIRC1.Nick" nicht.

Alles andere funktioniert.
weis evtl. jemand was man da machen kann?
  Mit Zitat antworten Zitat
Themen-Optionen Tutorial durchsuchen
Tutorial durchsuchen:

Erweiterte Suche
Ansicht

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 10:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf