MarkusBauer - Sa 20.10.07 18:35
Titel: Aufhängen bei fehlender Verbindung verhindern
Ich habe ein Programm geschrieben, dass über Post Daten ins Internet übermitteln und die Antwort empfangen soll. Doch wenn keine Internetverbindung besteht oder man die Übertragung mit einer Firewall blockiert, hängt sich das ganze Programm auf.
Ich habe das komplette Forum durchsucht, aber alle angegebenen Möglichkeiten halfen nicht.
Ich habe:
- Ein TIdAntiFreeze-Objekt auf dem Formular platziert und OnlyWhenIdle auf false gesetzt
- Einen try-except-Block um die Aufforderung geschrieben
- Die Funktion InternetGetConnectedState(nil, 0) benutzt
- Alle Timeouts der HTTP-Komponente auf 5000 gesetzt
Gibt es irgenteine Möglichkeit das Aufhängen zu verhindern?
Markus
PS: Wie kann man den User-Agent-Wert bei TIdHTTP.Post verändern?
TTHREAD auslagern.