Einzelnen Beitrag anzeigen

th_bone

Registriert seit: 16. Jun 2004
172 Beiträge
 
Delphi 2005 Professional
 
#1

Indy TCPclient Disconnect Problem

  Alt 6. Dez 2005, 10:36
Hi,

folgender Ausgangspunkt (Indy10) ich habe eine Form mit einem
Programm1
TCPserver(Port 1700) und
TCPclient(Port 1701)

die sich zu einem 2ten program mit ebenfalls

Programm2
TCPclient (Port 1700) und
TCPserver (Port 1701) verbinden sollen

soweit so gut den server starte ich jeweils automatisch bei Programmstart

dann connecte ich die clients per button

Delphi-Quellcode:
procedure TForm1.BTconnectClick(Sender: TObject);
begin
  if TCPclient.Connected=false then begin
    TCPClient.Create.Host := '127.0.0.1';
    TCPClient.Create.Port := 1701; // beim 2ten Prog Port 1700
    TCPClient.create.Connect;
  end else begin
    TCPClient.Disconnect;
  end;
end;
jetzt das Problem:

Client disconnect funktioniert serverseitig ohne probleme ABER
der client denkt weiterhin er ist connected - sprich jeder versuch
wieder zu connecten schlägt fehl... wenn ich den connect über einen
2ten button versuche, dann kommt die meldung das der client bereits
connected wäre - was er aber definitiv nicht ist

Bin im Moment völlig ratlos..

Danke

Ralf
  Mit Zitat antworten Zitat