Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Socket-Fehler #10061 / Wartezeit bei Clientverbindung (https://www.delphipraxis.net/17743-socket-fehler-10061-wartezeit-bei-clientverbindung.html)

Wilder 9. Mär 2004 10:09


Socket-Fehler #10061 / Wartezeit bei Clientverbindung
 
Moin!

Ich bin dabei eine Verbindung zu einem Server herzustellen und möchte dabei den Client solange warten lassen, bis der Server startet. Leider kann ich trotz einstellen der Zeit via IdTCPClient1.Connect(2000) keinen Zeitraum angeben. Nach einem kleineren Zeitraum kommt halt immer die Fehlermeldung "Socket-Fehler #10061. Verbindung abgelehnt." Und das, wo ich nochnichtmal nen Server auf der anderen Seite habe. Woran kann das liegen und wie kann ich das abändern?
Zusatz:
Ich verwende die Indy-9-Komponenten, die bei Delphi7 bereits dabei sind.

Delphi-Quellcode:
procedure TForm4.Button1Click(Sender: TObject);
begin
  form4.IdTCPClient1.Host := Edit1.Text + '.' + Edit2.Text + '.' + Edit3.Text + '.' + Edit4.Text;
  Try
    form4.IdTCPClient1.Connect(2000);
  except
  on EIdConnectTimeout do begin
    showmessage ('Verbindung konnte nicht aufgebaut werden, da der Server nicht antwortet');
  end;
  end;
  end;

Wilder 11. Mär 2004 11:30

Re: Socket-Fehler #10061 / Wartezeit bei Clientverbindung
 
bitte Thread schließen, da ich die Lösung bereits selbst herausgefunden habe.

Sharky 11. Mär 2004 11:35

Re: Socket-Fehler #10061 / Wartezeit bei Clientverbindung
 
Hai Wilder,

Herlich Willkommen in der Delphi-PRAXIS.
Zitat:

Zitat von Wilder
bitte Thread schließen, da ich die Lösung bereits selbst herausgefunden habe.

Es wäre nett wenn Du deine Lösung postest. Dann können andere User davon profitieren. Danke :-D

Wilder 12. Mär 2004 14:39

Re: Socket-Fehler #10061 / Wartezeit bei Clientverbindung
 
Lösung:

1. Nachinstallieren von Sockets unter Delphi 7
2. Prinzip Server/Client erkannt: Server muß laufen, damit Client connecten kann.
Ansonsten Verbindungstimeout, welchen ich über ein onError-Eregnis abgefangen habe.

Die TCP- und Indy-Komponenten fand ich letztlich ziemlich umständlich.
Ausserdem existieren auch nicht allzuviele Beispiele dazu. Daher die Socket-Nachinstallation.

:)


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:51 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz