Einzelnen Beitrag anzeigen

ils566

Registriert seit: 3. Dez 2005
28 Beiträge
 
#6

Re: Exception ohne Fehlermeldung auslösen

  Alt 1. Mai 2006, 15:49
danke für Eure Hinweise. Ich denke, ich muss das noch etwas genauer erläutern.

Ich habe eine Unit, die nicht von mir erstellt wurde. Die Unit löst an einer bestimmten Stelle eine Exception mit einem englischen Text aus.

Delphi-Quellcode:
FremdeUnit.pas

Function RestoreGraph()
begin
   ...
   raise EVideoCaptureError.Create (' ...you probably do not have ...');
   ...
end;
In meiner eigenen Unit rufe ich die Funktion RestoreGraph() auf und versuche den Fehler abzufangen:

Delphi-Quellcode:
MyUnit.pas
...
   try
      ...
      RestoreGraph ();
      ...
   except on EVideoCaptureError do
      ShowMessage ('Hier soll meine Fehlermeldung erscheinen');
   end;
...
Wenn ich das Programm wie oben dargestellt ausführe, kommt zuerst die 'englische' Meldung und erst dannach meine. Eigentlich dachte ich, wenn ich die Exception abfange, müsste doch mein except-block ausgeführt werden.
Oder etwa nicht?

grüße
ils
  Mit Zitat antworten Zitat