IdTCPClient <> IdTCPServer: Verbindungsproblem

[DataCool]

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