formCloseQuery umgehen

[happyaura]

erst einmal vielen Dank für die Antworten
@SirThornberry
den weg über eine extra variable wollte ich möglichst umgehen, da es nur um ein einmaliges fehlerabfangen beim starten geht.

@Der_Unwissende
man munkelt, es soll auch ausserhalb des OI die möglichkeit geben, events zuzuordnen...
auf die idee hätte ich vielleicht auch mal selbst kommen können, schlimm, wie man manachmal auf dem schlauch steht.

aber leider tritt noch ein kleines problem auf:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
   ...
  private
    procedure DoOnFormCreate;
    procedure DoOnCloseQuery(* was auch immer benötigt wird *)
  end;

procedure TForm1.DoOnFormcreate(sender:TObject;
begin
  ...
  if ERFOLGREICH then
    begin
      self.OnCloseQuery := self.DoOnCloseQuery;
    end
  else
   self.close ; //<--- geht nicht
end;

ich kann mein programm während des Events "OnCreate" nicht mit self.close schließen. gibt es da alternativen, sonst muß ich mir noch mal was anderes überlegen.