fehler mit dem server

[jokerfacehro]

Zitat:

das muss ich doch machen, wenn ich die verbindung beenden will oder?

guck ma du erstellst jedes mal beim durchlauf deiner while-schleife das objekt client erneut ohne es vorher wieder freizugeben.

mach doch einfach

Delphi-Quellcode:

Client := TClientSocket.Create( Form1 );

while Initialized = False do
  begin
    try
      Initialized := True;
      Client.Host := '127.0.0.1';  // Localhost
      Client.Port := 1990;
      Client.OnRead := ClientRead;
      Client.Open;
    Except
      Initialized := False;
      sleep(5000);
    end;
  end;