Delphi 5 zeigt keine Fehlermeldung an

[Der schöne Günther]

Du kannst auch eine Release-Fassung im Debugger laufen lassen. Da sollte die Exception auch auftreten, richtig?

Die Frage ist ja, wie du explizit schreibst, dass sie dem Benutzer nicht angezeigt wird. Das kann man abstellen, indem man z.B. seinen eigenen (leeren) Exception-Handler in der VCL registriert, aber sowas macht man sicher nicht mal "aus Versehen". Aber so klingt es, denn der Benutzer hat in der Debug-Fassung ebenfalls keine Messagebox welche den Fehler anzeigt, richtig?

[LikeMike]

Wie lasse ich eine Release-Fassung im Debugger laufen?

[Der schöne Günther]

Ich hätte gesagt F9 drücken? Wenn du die Release-Fassung erstellen kannst, dann kannst du sie doch auch debuggen?

Aber sorry, Delphi 5 - Da kann ich nicht helfen. Als das raus kam bin ich noch in die Grundschule 👶 gegangen, und heute bin ich so alt dass ich keine Haare mehr auf dem Kopf habe. Das sollte einen auch mal zum Überlegen bringen, ob man nicht eh mal auf was neueres wechseln sollte - Da können dann vielleicht auch mehr Leute helfen 😉

[LikeMike]

Schon richtig, aber ich arbeite natürlich auch mit Delphi Sydney und fast allen Vorgängern, aber bei so einem verzahnten und umfangreichen System mit 100ten von Komponenten (die es teilweise gar nicht mehr in neueren Version zu kaufen gibt) bleibt mir nichts anderes übrig, als mit Delphi 5 weiter zu machen.
Aber nochmal zum Debuggen. Wenn ich mit F9 compiliere erhalte ich schon die Debugger-Fehlermeldung. Die Meldung, die dem Benutzer aber im Normalfall angezeigt würde, erscheint da aber eben auch nicht.

[Der schöne Günther]

Alles klar, dann hört sich das tatsächlich so an, als sei nur die Messagebox für den Benutzer vorm Bildschirm abgeschaltet.

Weise doch mal testweise das OnException -Event zu, wie hier in diesem Beispiel:
https://docwiki.embarcadero.com/Code...ption_(Delphi)

Dann wird doch hoffentlich was angezeigt, oder?

[LikeMike]

Vielen Dank!!! Das funktioniert!

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnException := AppException;
end;

procedure TForm1.AppException(Sender: TObject; E: Exception);
begin
  Application.ShowException(E);
end;

Damit ist zwar der Fehler nicht gefunden, aber als Workaround reicht mir das!
Nochmals "Danke an alle"!

[himitsu]

@Delphi.Narium: In D5 gab es das noch nicht.

Da konnte man sich nur direkt an Application hängen und mußte aufpassen, dass man sich nicht ausversehn versucht mehrmals anzuhängen und dabei was überschreibt/abhängt.

[Delphi.Narium]

Gibt es irgendwo in einer Unit eine Komponente TApplicationEvents?

Wenn ja: Der kann man beim Ereignis OnException eine Routine zuweisen, die bei jeder unbehandelten Exception aufgerufen wird.

Und wenn die dann (sinngemäß) so aussieht

Delphi-Quellcode:

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
  E: Exception);
begin
  //
end;

passiert genau das, was Du beschreibst.

Oder anders ausgedrückt:

Gibt es irgendwo eine zentrale Fehlerbehandlung im Programm, die leider keine Fehlermeldungen ausgibt, die Fehler eventuell loggen könnte, das Logging wurde aber andernorts deaktiviert, ...

Zugegeben: Wäre eher eine ziemlich schräge Konstellation, aber absolut auszuschließen ist sie nicht.