Einzelnen Beitrag anzeigen

Benutzerbild von DataCool
DataCool

Registriert seit: 10. Feb 2003
Ort: Lingen
909 Beiträge
 
Delphi 10.3 Rio
 
#18

Re: IdTCPClient <> IdTCPServer: Verbindungsproblem

  Alt 18. Sep 2008, 21:32
Hi,

das es so Laufen soll wie Du beschrieben hast war mir schon klar.

Aber Du hast geschrieben :
Zitat:
Ich entwickle gerade ein Chatprogramm, das ohne Server auskommen soll.
Allerdings hab ich keine Lust, 2 unterschiedliche Programme zu machen, die dann jeder besitzen muss... Also mach ich eins, das einen IdTCPClient und einen IdTCPServer enthält.
Kein Server und keine 2 unterschiedlichen Programme.
Das bedeutet für mich das Du mit einem Programm arbeitest das entweder Client oder Server sein kann.
Somit hast Du TcpClient und TcpServer in einem Programm untergebracht.
Und bei Deinem Source Demo ist es im

Klick auf "Connect Button" : IdTCPClient1.Host:=IPEdit.Text;

Innerhalb des Servers OnExecute verwendest Du :
IdTCPClient1.Host:=AThread.Connection.Socket.Bindi ng.PeerIP; //IP auslesen
IdTCPClient1.Connect();

Wenn Du das Programm jetzt mit Dir selbst testet knallt es wie ich beschrieben habe,
mit 2 unterschiedlichen PC's sollte es sogar gehen, wenn Du im OnConnect den Server des Clients auch auf active = true setzt.

Greetz Data
Der Horizont vieler Menschen ist ein Kreis mit Radius Null, und das nennen sie ihren Standpunkt.
  Mit Zitat antworten Zitat