Hallo Delphifreunde!

Ich beziehe mich auf jene Diskussion, in der mir gut geholfen wurde (danke nochmal dafür!).

Nunmehr lagere ich die zeitintensiven Berechnungen sukkzessiv in externe Threads aus, es klappt soweit auch ganz gut. Der Zugriff auf einige VCL-Elemente bzw. -Funktionen ist teilweise erschwert, es muß dann mit synchronize gearbeitet werden, aber die Vorteile am fertigen Programm sind naütrlich erheblich.

Doch jetzt wird es schwieriger. Eine bestimmte Berechnung erlaubt nicht alle Eingaben (das ist ja in der Mathematik sehr oft so), und derart ungültige Berechnungen werden mit try abgefangen (wohl der einfachste Weg, anstatt die Eingabewerte "mühsam" und ggf. sogar einzeln auf Konsistenz zu prüfen):

markieren

Delphi-Quellcode:

try
//Versuch der Berechnung
except showmessage('Fehler')
end;

funktionierte im VCL-Thread tadellos, sodaß das Programm auch bei ungültigen Eingaben eine Fehlermeldung ausgibt und danach problemlos weiterläuft, anstatt abzustürzen.

Im Extra-Rechenthread jedoch funktioniert das

zusammenfalten · markieren

Delphi-Quellcode:

procedure Fehlermeldung;
begin
showmessage('Fehler')
end;

.
.
try
//Versuch der Berechnung
except synchronizie(Fehlermeldung)
end;

nur insoweit, als daß die Fehlermeldung zwar auch kommt, wenn die Bedingungen dafür gegeben sind, jedoch danach das Programm dennoch mit einer Fehlermeldung ("Exception") abstürzt.

Kann man dem try-except-block die volle Funktionalität wie im VCL-Thread verpassen, also diesen Absturz irgendwie vermeiden?

Danke im voraus und Gruß

Delphi-Laie

Zitat von Delphi-Laie:

nur insoweit, als daß die Fehlermeldung zwar auch kommt, wenn die Bedingungen dafür gegeben sind, jedoch danach das Programm dennoch mit einer Fehlermeldung ("Exception") abstürzt.

Welche Exception kommt denn genau?

Zitat von Uwe Raabe:

Zitat von Delphi-Laie:

nur insoweit, als daß die Fehlermeldung zwar auch kommt, wenn die Bedingungen dafür gegeben sind, jedoch danach das Programm dennoch mit einer Fehlermeldung ("Exception") abstürzt.

Welche Exception kommt denn genau?

Siehe Anhang.

Sie kommt nach meiner selbstprogrammierten Fehlermeldung, und danach ist mit dem Programm Ende.

Wie gesagt, als alles im VCL-Thread lief, lief es wie gewünscht.

Die Excepion hat eine andere Ursache. Überprüfe mal, ob die im Fehlerfall nicht doch irgendwelche Variablen verwendest, die dann noch nicht oder nicht mehr da sind. Immerhin wird der Code im Thread nicht vollständig durchlaufen, sondern mittendrin durch die Exception abgebrochen.

Wenn du mehr wissen willst, musst du mehr Code liefern.

Zitat von Uwe Raabe:

Die Excepion hat eine andere Ursache.

Eine andere Ursache als was?

Zitat von Uwe Raabe:

Überprüfe mal, ob die im Fehlerfall nicht doch irgendwelche Variablen verwendest, die dann noch nicht oder nicht mehr da sind.

Mit Sicherheit kann etwas nicht (richtig) konvertiert werden, das war mir gleich klar, aber dafür ist try..except schließlich da und funktionerte doch vorher auch.

Zitat von Uwe Raabe:

Immerhin wird der Code im Thread nicht vollständig durchlaufen, sondern mittendrin durch die Exception abgebrochen.

Ja, aber genau dafür, um so etwas abzufangen, ist schließlich doch try..except da (jetzt wiederhole ich mich allmählich)?! Wie kann ein und derselbe Code in einem Thread eine exception auslösen, im anderen Code, der im VCL-Thread läuft, die exception abgefangen werden? Leuchtet mir nicht ein.

Zitat von Uwe Raabe:

Wenn du mehr wissen willst, musst du mehr Code liefern.

Das ist leider nicht so einfach, denn es spielen mehrere Routinen und Deklarationen aus mehreren Units mit. Aber wenigstens scheint sich auch Nicht-VCL-Thread-Code im Quelltext via Debugger schrittweise nachverfolgen zu lassen.

Danke an Dich erstmal für Dein Bemühen!

So, ich bin ein Stück weiter.

Schuld ist nicht irgendeine der externe Berechnungsfunktionen aus einer externen Unit, sondern - als Argument dafür - eine schnöde Typkonvertierung (prinzipieller Quellcode):

markieren

Delphi-Quellcode:

try
strtoint([String(variable)])
except

, wobei der String, als Integerzahl gedacht, größer als der größtmögliche Wert der Integervariablen ist (der String könnte genausogut ungültige Zeichen enthalten, gerade ausprobiert).

Außerhalb des VCL-Threads funktioniert try..except offenbar nur eingeschränkt: Except wird zwar aufgerufen, die Exception jedoch nicht abgefangen.