Hallo,
warum schreibst du nicht gleich,
dass Caption bei der
Exception nicht gesetzt wird ?
Dann muss man sich nicht durch Screenshots hangeln ! tztz
Zitat:
Wenn ich den Debugger ausschalte, wirft mir das
OS die passende Fehlermeldung aus
Hier wäre ein Screenshot hilfreich.
Mal ein einfaches Bsp.
Neues Projekt erstellen
Timer aufs Form und in OnTimer rein.
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls;
type
TForm1 =
class(TForm)
Timer1: TTimer;
procedure Timer1Timer(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Beep;
try
raise Exception.Create('
bla');
except
Caption:= '
argz';
end;
end;
end.
Er piept und es wird
argz angezeigt.
Um eine
Exception zu erzeugen, reicht es übrigens nicht, einfach
Exception.Create('bla');
Ohne das
raise passiert gar nichts, ausser ein Speicherleck.
Heiko