Indy Server und Client im Netzwerk

[Gerhard Wascinski]

Hallo Leute,

ich arbeite grade mit den beiden Indy Komponenten TcpServer und TcpClient.
Solange ich beide lokal auf dem gleichen Rechner laufen lasse funktioniert alles einwandfrei.
Portiere ich nun den TcpServer auf eine andere Maschine im Netz und ändere auch die IPAdresse im TcpClient, dann erhalte ich immer die Meldung "SocketFehler 10061, Verbindung abgelehnt."

Was muss man am TcpServer einstellen, das er jede Clientanfrage annimmt?

Danke für eine schnelle Antwort.

[Christian Marquardt]

gefunden zu dem von dir geschliderten Problem:

procedure TMainForm.InitServer;
var
  ABinding: TIdSocketHandle;
begin
  TCPServer.Active := False; { Server inaktiv setzen sonst können keine Bindungen angelegt werden! }
  { Bindung(en) anlegen (auf diese IP / Port "hört" der Server) }
  ABinding := TCPServer.Bindings.Add;
  ABinding.IP := '127.0.0.1';  { Bindung auf Localhost }
  ABinding.Port := 85;         { Port = 85 }
  TCPServer.Active := True;    { Server aktiv setzen }
end;

[Gerhard Wascinski]

Schnelle Antwort

gefunden zu dem von dir geschliderten Problem:

procedure TMainForm.InitServer;
var
  ABinding: TIdSocketHandle;
begin
  TCPServer.Active := False; { Server inaktiv setzen sonst können keine Bindungen angelegt werden! }
  { Bindung(en) anlegen (auf diese IP / Port "hört" der Server) }
  ABinding := TCPServer.Bindings.Add;
  ABinding.IP := '127.0.0.1';  { Bindung auf Localhost }
  ABinding.Port := 85;         { Port = 85 }
  TCPServer.Active := True;    { Server aktiv setzen }
end;

Danke Dir, probiere das gleich morgen aus und sag bescheid obs klappt.
Könnte es auch an Zugangsberechtigungen liegen?

[Christian Marquardt]

Könnte es auch an Zugangsberechtigungen liegen?

Dann musst du mal den Client auch auf diesen Rechner bringen. Wenn es dann läuft liegt das Problem im Netzwerk

[Gerhard Wascinski]

Dann musst du mal den Client auch auf diesen Rechner bringen. Wenn es dann läuft liegt das Problem im Netzwerk

Das war die Lösung, nun funktioniert es

Vielen Dank, hast mir sehr geholfen.

Gerhard