Intenta eso :
no utilizas FormCreate pero override el Create de Form
y, depues del inherited creo que podras hacer un showmessage...
Código Delphi
[-]
TForm4 = class(TForm)
public
constructor Create(AOwner: TComponent); override;
end;
(...)
constructor TForm4.Create(AOwner: TComponent);
begin
inherited;
showmessage('OK');
end;
no sé si va a resolver tu problema, pero es una pista
David