| Usuario |
TreeView |
alecoloma13
8 Mensaje(s)
|
| Enviado - 30/11/2004 |
| |
Estoy usando el componente TreeView que es del tipo TTreeView y con el cual logre insertar un nodo y a su vez logro agregarle un hijo a este nodo.
Lo que quiero y no me sale es seguir agregando hijos a los hijos. Es decir lograr un mayor nivel de profundidad. Seria un Subitem. Todo esto por codigo, pero no encuentro la forma. Envio aca como inserto y agrego un hijo:
procedure TForm1.Button1Click(Sender: TObject);
var nodo1,nodo2,nodo3: ttreenode;
begin
nodo1:=ttreenode.Create(treeview1.Items);
nodo1 := treeview1.Items.Insert(nodo1,'jjjjj');
treeview1.Items.AddChild(nodo1, 'aleluya');
nodo1.Selected;
treeview1.SetFocus;
end;
Pongan en un Form un componente, agreguen un item desde las propiedades y corran esto. |
| |
|
alecoloma13
8 Mensaje(s)
|
| Enviado - 30/11/2004 |
| |
ya lo tengo. Hay que hacer lo siguiente:
Nodo2 := TreeView1.Items[1];
TreeView1.Items.AddChild(Nodo2,'minuevonodo');
y listo. Gracias a todos. Chau, yo mismo. |
| |
|
|
|
