AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke TIDTCPIPClient.Connect ohne exception abbrechen
Thema durchsuchen
Ansicht
Themen-Optionen

TIDTCPIPClient.Connect ohne exception abbrechen

Ein Thema von QuickAndDirty · begonnen am 10. Mär 2025 · letzter Beitrag vom 10. Mär 2025
Antwort Antwort
QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.981 Beiträge
 
Delphi 12 Athens
 
#1

TIDTCPIPClient.Connect ohne exception abbrechen

  Alt Heute, 13:11
So baue ich moment eine TCP Verbindung auf .
Delphi-Quellcode:
procedure TConnectCLientThread.Execute;
begin
  var attempts := 0;
  While (Not Terminated) and (Not Client.Connected) and (Attempts < MAX_CONNECTIONATTEMPTS) do
  Begin
    try
      inc(attempts);
      Client.Connect;
    Except
      On E:Exception do
      Begin
        TThreadedLog.LogD('TConnectCLientThread Connection attempt number '+attempts.ToString+' : ' + E.Message);
      End;
    end;
  End;
end;
Ich würde das Verbinden gerne abbrechen können, daher diese Konstruktion.

Es wäre mir lieber wenn ich irgendwie and ohne Exception den ConnectionTimeout mitbekäme oder wenn ich z.b. einen infinite ConnectionTimeout setzten könnte und irgendwie den Connectionversuch ohne Exception abbrechen könnte.

Seht ihr da eine Chance?
Andreas
Monads? Wtf are Monads?

Geändert von QuickAndDirty (Heute um 13:15 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.837 Beiträge
 
Delphi 12 Athens
 
#2

AW: TIDTCPIPClient.Connect ohne exception abbrechen

  Alt Heute, 14:46
Das wichtigste ist erst einmal, dass du von Indy zu ICS wechselst.

Indy nutzt immer blockierende Sockets, so dass du einen gestarteten Vorgang nicht abbrechen kannst. Timeouts kannst du natürlich nutzen, aber das ändert daran nichts, dass dann eben der entsprechende Thread hängt.

ICS nutzt aber nicht blockierende Sockets. Wenn du das Connect von TWSocket aufrufst, bekommst du ein Event OnSessionConnected, wenn die Verbindung hergestellt wurde. Das kannst du auch problemlos in einem Thread machen und wenn du die Verbindung oder den Verbindungsversuch abbrechen möchtest, rufst du einfach Close auf.
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.981 Beiträge
 
Delphi 12 Athens
 
#3

AW: TIDTCPIPClient.Connect ohne exception abbrechen

  Alt Heute, 15:06
Ich weiß nicht ob ich mal eben die Komponenten wechseln kann .
Es nervt einfach das der Programmfluss von Indy mit Exceptions geregelt wird, statt mit vernünftigen Rückgabe werten oder Events
Es gibt also keine Möglichkeit diese Exceptions zu vermeiden ? Jetzt so im Falle von Connect?

ICS hat keinen Android oder IOS Suppport ?
Andreas
Monads? Wtf are Monads?

Geändert von QuickAndDirty (Heute um 15:21 Uhr)
  Mit Zitat antworten Zitat
mjustin
Online

Registriert seit: 14. Apr 2008
3.008 Beiträge
 
Delphi 2009 Professional
 
#4

AW: TIDTCPIPClient.Connect ohne exception abbrechen

  Alt Heute, 17:32
So baue ich moment eine TCP Verbindung auf .
Ich würde das Verbinden gerne abbrechen können, daher diese Konstruktion.
In diesem Fall würde ich ein kleines ConnectTimeout setzen (z.B. 5 Sekunden), und dann Connect aufrufen bis die Verbindung erfolgreich war, oder die maximal Anzahl Verbindungsabbrüche erreicht ist. Defaultmäßig wartet Indy länger.

Exceptions haben hier den Vorteil, dass sie nicht so leicht übersehen können wie ein Rückgabewert und zudem auch noch Informationen zum Fehler liefern können. D.h. ob der Server überhaupt lokalisiert werden konnte ('No route to host') oder er die Verbindung verweigert hat ('Connection refused').
Michael Justin
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:48 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz