[HowTo] Einen Chat programmieren?

[citybreaker]

Hallo,

was genau brauch ich um einen Chat zu programmieren? Hab mir Indy 9.0
runtergeladen und in Delphi eingefügt. Alerdings waren keine Demos/Beispiele in der
Zip Datei. :roll:

[Mirilin]

:hi:

Schau Dich auf der Indy Download Seite um (da gibts Demos), und konsultiere Google.
Wenn Du dann kokrete Fragen hast ...


mfg Tobias

[citybreaker]

Ok, habe ein Deutsches Tutorial beu Delphi Source gefunden und
dierekt mal los getippt.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  TCPServer.Active := true;
end;

procedure TForm1.TCPServerExecute(AThread: TIdPeerThread);
begin
  with AThread.Connection do begin
    WriteLn('Hallo Welt');
    Disconnect;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TCPClient do begin
    Connect;
    try
     ListBox1.Items.Add(ReadLn);
    finally
     Disconnect;
    end;
  end;
end;

Sobald ich nun auf den Button klicke wird mir etwas mitgeteilt.
"Sockert Error #11001
Host not found"

Muss ich bei host etwas bestimmtes angeben?

[Chewie]

Zitat:

Zitat von citybreaker

Muss ich bei host etwas bestimmtes angeben?

Aber ja, das Ziel deiner Verbindung, sprich den Chatpartner! Wenn es der selbe Redhner ist, dann localhost.

[Mirilin]

:hi:

hast Du es auch gelesen? :wink:

Dieses Tutorial ?

Tutorial meint (ist es dieses?)

Die Client-Anwendung enthält neben der TCP-Client-Komponente einen Button und eine ListBox (lstMain). Wird auf den Button geklickt, so wird obiger Code ausgeführt: Zunächst baut der TCP-Client eine Verbindung zu einem TCP-Server auf (als Host ist hier der lokale Server 127.0.0.1 angegeben). Der TCP-Server stellt fest, dass jemand etwas von ihm will (siehe OnExecute oben), und schickt den Text "Hello from Basic Indy Server server" zurück. Der Client fügt diesen Text der Listbox hinzu und beendet die Verbindung wieder.

mfg Tobias

ps : Hast Du die Indy_Demos gefunden?

[citybreaker]

Hab nach der Indy Demo noch nicht gesucht. Woher weiß ich denn den Host mit dem ich Chatten will? Und was angeben wenn ich mir mehreren chatten will? :pale:

[SirThornberry]

Wenn du mit mehreren Leuten chatten willst wirst du um einen zentralen server nicht herumkommen. Dieser kann dann die ganzen ips, der anderen bei deren Anmeldung verwalten oder er routet einfach die Messages an den Empfänger weiter. Irgendwann hatte ich mal so nen kleines Beispiel dazu gepostet. Die IP-Adresse vom Server musst du allerdings dann auch wissen, aber das ist selbst bei icq dort, zumindest wird dort der hostname angegeben...

[Edit1]
Link rausgesucht: http://www.delphipraxis.net/internal...ct.php?t=18136
[/Edit1]

[Mirilin]

:hi:

Hier, mein Sohn

Such sonst mal bei Google oder hier im Forum. Irgendwo wirst Du sicher etwas darüber erfahren.

mfg Tobias

[citybreaker]

Zitat:

Zitat von Mirilin

:hi:

Hier, mein Sohn

Such sonst mal bei Google oder hier im Forum. Irgendwo wirst Du sicher etwas darüber erfahren.

mfg Tobias

Danke. :zwinker:
Hab mal localhost bei host ausprobiert und die ip auch. Alerdings kommt noch immer
die selbe fehlermeldung. Muss ich event. noch mehr im OI bei idTCPClient und Server ausfüllen?

[Meflin]

die ports müssen natürlich auch übereinstimmen :!: