Antes de nada, mírate éste hilo, acabo de respònder otra pregunta sobre TreeView y tal vez el código de ejemplo te sirva:
http://www.clubdelphi.com/foros/showthread.php?t=15724
Cita:
Empezado por MaGNa
¿Qué hago mal? ¿Me pueden poner un ejemplo?
|
Para añadir un elemento raiz puedes hacer lo siguiente (importante que "recojas" el nodo añadido para luego usarlo en los hijos...)
Código Delphi
[-]
var
node:TTreeNode;
...
node := TreeView1.Items.AddFirst(nil, 'Nodo Raiz');
Para añadir "hijos a éste nodo":
Código Delphi
[-]
node := TreeView1.Items.AddChild(node, 'Primer Hijo');
node := TreeView1.Items.AddChild(node, 'Segundo hijo');
...
Cita:
Empezado por MaGNa
¿Cómo podría asignar un evento DblClick a cada item? o en su defecto, ¿Cómo obtener el texto del item seleccionado?
|
El objeto (o mejor dicho) la clase TTreeNode no posee evento OnClick, puedes utilizar el del TreeView. Para acceder al elemento seleccionado basta con que utilices la propiedad
Selected del
TTreeView
Código Delphi
[-]
procedure TForm1.TreeView1Click(Sender: TObject);
var
node:TTreeNode;
begin
node := TreeView1.Selected;
MessageDlg('Selected: ' + node.Text, mtInformation, [mbOK], 0);
end;
Cita:
Empezado por MaGNa
¿Cómo obtener el texto del item seleccionado?
|
Como se ha visto antes, una vez que tienes al nodo seleccionado con
Selected, ya puedes acceder a todas sus propiedades.