Tray Programm ohne VCL

[Novo]

Hallo,
ich möchte eine kleine Tray App schreiben:
http://delphi.about.com/library/code/ncaa121801a.htm

Aber da diese ohne Forms auskommen soll, ist es Blödsinn die forms.pas mitzucompilen und das Fenster nur mit Application.ShowMainForm := False zu verstecken.

Wenn ich eine Console App schreibe und das {$APPTYPE CONSOLE} weglasse, habe ich aber kein
OnCreate und OnClose Event mehr. Das Programm beendet sich wenn es bei end ankommt.

Wie mache ich das nun?


Mfg Novo