[jsc]

hola,
me estoy volviendo loco y no consigo resultado. a ver si podeis ayudarme

tengo un "panel" que utilizo en plan menu con varios botones "clientes" "facturas"... en una form (form1)

cuando pulso un boton, abre su correspondiente form dentro del form1 (el form1 actua como ventana padre)
a su vez, dimensiono la form para que se muestre correctamente en el form1

la cuestion es que estoy intentando hacer, un procedimiento comun que sirva para el evento onclick de cada boton; asi, el codigo para redimensionar la form que hay que abrir, asignar el "parent"... tendria que ponerlo solo una vez

intento esto:

procedure abreform (sender :tobject)
var form : string ;
 begin
   form := (sender as tbutton).caption ;
   application.createform ((form as tform),form) ;
   (form as tform).show ;
   (form as tform).parent := form1 ;
   (form as tform).top := form1.top-....
end;

procedure form1.clientes.onclick (sender :tobject)
begin
   abreform (sender) ;
end;

procedure form1.facturas.onclick (sender :tobjec)
begin
   abreform (sender) ;
end;

e intento evitar tener que "duplicar" para cada boton

procedure form1.clientes.onclick (sender :tobject)
begin
   application.createform(tformclientes,formclientes);
   formclientes.show ;
   formclientes.parent :=  form1 ;
   formclientes.top:= ...
end;

procedure form1.facturas.onclick (sender :tobject)
begin
   application.createform(tformfacturas,formfacturas);
   formfacturas.show ;
   formfacturas.parent :=  form1 ;
   formfacturas.top:= ...
end;

es posible hacer algo de esto?
gracias por la ayuda