warum sicherst du dir nicht einfach das alte OnCreate des formulars und rufst dies dann in deinem init auf?
Delphi-Quellcode:
fOldOnCreate := (AOwner as TForm).OnCreate;
(AOwner as TForm).OnCreate := Init;
[...]
procedure [...].Init;
begin
//do something
fOldOnCreate(Owner);
end;