Hi,
du musst nicht über diese Variable gehen. Du kannst zwar ein Event nicht wirklich umgehen, aber eingetragen für ein solches Event wird immer nur ein Funktionszeiger. Wenn du nun keine Behandlung des Events OnCloseQuery möchtest, so brauchst du nur den leeren / nil Zeiger angeben (z.B. im Objektinspektor kein Eintrage bei dem Ereignis OnCloseQuery).
Wurde dein Init erfolgreich ausgeführt, so kannst du dort (nachdem du weißt dass es erfolgreich war) einfach deine Behandlung zuweisen:
Delphi-Quellcode:
type
TForm1 = class(TForm)
...
private
procedure init;
procedure DoOnCloseQuery(* was auch immer benötigt wird *)
end;
procedure TForm1.init;
begin
...
if ERFOLGREICH then
begin
self.OnCloseQuery := self.DoOnCloseQuery;
end;
end;