Ver Mensaje Individual
  #2  
Antiguo 02-11-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Enan0.

Cita:
Estoy necesitando, repertir una ventana (MDI child) que ya tengo funcionando correcta unas 10 veces mas, en forma de mosaico, el problema es que Estos mosaicos, deberian de estar contenido dentro de una ventana padre.
Eso se puede hacer sin problemas desde el MDIForm, por ejemplo:
Código Delphi [-]
...
function FormClone(aForm: TForm; aName: string):TForm;
var
  ms : TMemoryStream;
  F  : TForm;
begin
  ms := TMemoryStream.Create;
  try
    ms.WriteComponent(aForm) ;
    ms.Position   := 0;
    F := TFormClass(aForm.ClassType).CreateNew(Application) ;
    ms.ReadComponent(F) ;
    F.Name    := aName;
    F.Caption := aName;
    Result    := F;
  finally
    ms.Free;
  end;
end;

// llamada
procedure TMDIForm.Panel1Click(Sender: TObject);
var
  i: Integer;
begin
  MDIChild1 := TMDIChild1.Create(Application);
  for i:= 10 downto 1 do
    FormClone(MDIChild1, 'MDIChild'+IntToStr(i+1));
  TileMode:= tbVertical;
  Tile;
  ...
end;
...

Cita:
¿Es posible que un MDI Child, Contenga N Mdichild's?
No, sólo un MDIForm puede contener MDIChilds.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita