Property vorhanden um festzustellen ob im OnLoad-Event

[himitsu]

Blos nochmal zum Erwähnen ^^

Delphi-Quellcode:

Procedure TForm1.FormCreate(Sender: TObject);
  Var _OnResize: Pointer;

  Begin
    _OnResize := Self.OnResize;  Self.OnResize := nil;

    ...

    Self.OnResize := _OnResize;
  End;

Vorteile:
der Vorfahr braucht nicht geändert zu werden
und in den EventHandlern ist kein Code nötig (diese werden ja garnicht aufgerufen)