Application.OnExcept umleiten?

[Pseudemys Nelsoni]

Moin,

wie könnte ich folgendes realisieren:

Delphi-Quellcode:

procedure ExceptionHandler(Sender: TObject; E: Exception);
begin

end;

begin
  Application.Initialize;
  Application.Title := 'jo';
  Application.CreateForm(TForm1, Form1);
  Application.OnException := ExceptionHandler;
  Application.Run;
end.

?

OnException ist ja eine Methode "of object", deswegen kann ich sie nicht auf meine Prozedur umleiten, doch genau das möchte ich, nur wie? Muss ich jetzt extra ne Klasse schreiben?