Ver Mensaje Individual
  #6  
Antiguo 27-08-2008
[coso] coso is offline
Miembro Premium
 
Registrado: may 2008
Ubicación: Girona
Posts: 1.678
Reputación: 0
coso Va por buen camino
igualmente, tu codigo no estaba mal, solo que en vez de destruir y volver a crear, podias asignarlo a una variable y alla tratarlo

Código Delphi [-]
procedure TForm1.TreeViewAmpliar(Sender: TObject);
var 
    t : TTreeview;
begin
   t := (Form1.findcomponent((sender as TTreeview).Name) as TTreeview);
   
   with t do
   begin
      Top    := 100;
      Left   := 100;
      Height := 500;
      Width  := 500;
   end;
end;

aunque, con el sender, es innecesario

Última edición por coso fecha: 27-08-2008 a las 11:57:39.
Responder Con Cita