Einzelnen Beitrag anzeigen

mohikaner

Registriert seit: 7. Sep 2006
Ort: Saarbrücken
5 Beiträge
 
Delphi 5 Standard
 
#3

Re: WinSock Error Anwendungsweit abfangen

  Alt 7. Sep 2006, 09:38
Ja, der Fehler kommt auch wenn ich die exe-Datei alleine (ohne IDE) starte. Er lautet: "Asyncroner Socket-Fehler 10061" Er tritt nur auf, wenn der entsprechende Gegenpart (WinSocket - Server) nicht erreichbar ist.

Ich habe inzwischen herausgefunden, dass er von dem TClientSocket - Ereignis "onError" erkannt wird. Das kann ich auch den Error-Code auslesen, allerdings kann ich die Fehlermeldung damit noch nicht unterdrücken.

CS1 := TClientSocket1

Delphi-Quellcode:
procedure TForm1.CS1Error(Sender: TObject; Socket: TCustomWinSocket;
  ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
  CS1.Active := False;
  Memo3.Lines.Add('Error...'+inttostr(ErrorCode));
end;
Ich möchte halt ein Verhalten ereichen, das die Client-Komponente immer wieder den Verbindungsaufbau versucht, ohne dass der Anwender ständig die Fehlermeldung wegklicken muss.

Regelmäßiges probieren "CS1.Active := True" klappt ja schon, allerdings kommt dann halt jedes mal wenn es nicht erfolgreich ist die Fehlermeldung und die muss weggeklickt werdn
Jörg
  Mit Zitat antworten Zitat