Ver Mensaje Individual
  #2  
Antiguo 02-02-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.109
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

No sé si te refieres al componente "TTreeView" que viene junto a Delphi (en la pestaña "Win32" de la paleta de componentes) o si te refieres a otro componente de terceros...

Sitúa un componente "TTreeView" en un formulario. Luego añade también un "TButton" al formulario y en su evento "OnClick" utilizas el siguiente código, a ver si te da una idea:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  nodoPadre, nodoHijo: TTreeNode;
begin
  // Añadimos un Nodo sin padre alguno al TreeView
  // guardando en "nodoPadre" una referencia al mismo...
  nodoPadre := TreeView1.Items.AddChild(nil, 'Nodo padre');

  // De modo que podamos luego añadir al Nodo los hijos...
  nodoHijo := TreeView1.Items.AddChild(nodoPadre, 'Nodo hijo');

  // ... y nietos que nos sean menester
  TreeView1.Items.AddChild(nodoHijo, 'Nodo nieto');
end;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita