![]() |
AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an
Ich hab das gerade noch einmal getestet.
Ich werde TTask in Zukunft definitiv meiden. In meinem TTask habe ich mehrere Zeilen Code und auch zum Test ein try-except. Wenn ich absichtlich einen Fehler erzeuge indem ich eine Internetseite mit Get aufrufe die es nicht gibt, springt Delphi niemals in den except-Teil der sofort nach IdHTTP1.Get() folgt. |
AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an
Das liegt dann aber nicht an TTask.
Es gibt einige Komponenten, wie teilweise auch in den Indy, welche selber drinen ein TryExept haben, interne Fehler abfangen an eigene Exception-Ereignisse weiterleiten und eventuell anschließend nicht "eventuell" neu auslösen. Bzw. die Fehler werden in Property/Funktionen gespeichert/bereitgestellt und die Methode gibt z.B. nur False zurück. (so wie man es oft von der WinAPI mit seinem GetLastError kennt) Aber sowas kann man da oftmals irgendwo einstellen, wie es sich verhalten soll. |
AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an
Dann wurde kürzlich irgendwas geändert.
Dieses beispiel funktioniert in einem TTask nicht.
Delphi-Quellcode:
try
idhttp1 ... get(nicht existierende url); except mache irgendwas, showmessage oder oder end; |
AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an
Zitat:
Delphi-Quellcode:
geht bei mir. dort kann ich die e.message nun verarbeiten,speichern an ein property senden, was auch immer. eventuell solltest du noch ein antifreeze auf die form ziehen.
procedure TTGMBot.btn14Click(Sender: TObject);
begin TTask.run(procedure() begin try idhtp1.Get('http://www.delphibtzujtzujasics.co.uk/RTL.asp?Name=raise'); except on E: Exception do begin end; end; end) end; |
AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an
Zitat:
Denn
Die Auflösung des Names kann auch mal etwas länger dauern (ca. 10 Sekunden). Wer dann ungeduldig ist, der könnte in die Versuchung kommen, dass dort der Exception-Block nie angesprungen wird (weil man die Anwendung nach 8 Sekunden schon wieder abgewürgt hat, weil ja nichts passiert ist). |
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:46 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-2025 by Thomas Breitkreuz