Holas, gracias por las respuestas. Como se me complicaba un poco de esa forma hice lo siguiente:
en el form padre
Código Delphi
[-]
hijo:=Thijo.Create(self);
hijo.newtop:=300;
hijo.showmodal;
hijo tiene la propiedad position=poMainFormCenter
y en el codigo del hijo:
Código Delphi
[-]
Public
newtop:integer
procedure Thijo.FormActivate(Sender: TObject);
begin
if newtop<>0 then
self.top:=newtop;
end;
Muchas gracias por la ayuda. Saludos