Ver Mensaje Individual
  #1  
Antiguo 20-07-2004
JoseQ JoseQ is offline
Miembro
 
Registrado: jul 2004
Posts: 167
Reputación: 20
JoseQ Va por buen camino
Paneles Child

Buenas, quiero crear un panel dentro del cual se generen, en runtime, paneles mas pequeños(formularios), consigo crear un form child en runtime, pero nose como hacer para que me genere varios, estaba probando a cambiarle el nombre al form nada mas crearlo i luego repetir toda el proceso, pero no funciona,al menos como io lo tengo , alguna sugerencia, este es el codigo que uso ahora para crear el child

Código Delphi [-]
procedure TMainForm.btnChildClick(Sender: TObject);
var x:integer;
begin
for x:=1 to 3 do
begin
if not Assigned(FNewChildForm) then
begin
FNewChildForm := TNewChildForm.Create(Application, pnlParent);
FNewChildform.Show;
fnewchildform.Height := pnlParent.Height div 2;
fnewchildform.Name:= 'child' + inttostr(x);
fnewchildform.Free;
end;
end;
end;

Última edición por JoseQ fecha: 20-07-2004 a las 16:55:09.
Responder Con Cita