Einzelnen Beitrag anzeigen

RedDust

Registriert seit: 26. Okt 2004
Ort: Könnern
96 Beiträge
 
Delphi 2005 Personal
 
#2

Re: MSG-Text in einem TMemo anzeigen?

  Alt 20. Apr 2005, 13:04
Kann dir zwar nicht sagen wie man dies Speziell abfängt aber ich hab' da eine Routiene die ich immer mal wieder gerne einsetze.

Delphi-Quellcode:
type
  ...
    procedure Fehlerhandler(Sender: TObject; E: Exception);
  private
  ...

implementation

procedure TForm1.Fehlerhandler(Sender: TObject; E: Exception);
var nachricht : string;
begin
  ShowMessage('Es trat folgender Fehler auf:' + #13 + #13 + E.Message);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnException := Fehlerhandler;
end;
Is vielleicht nicht die beste Lösung aber zumindest ein Anfang
Mario Franze
  Mit Zitat antworten Zitat