Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   dudas con respecto a treeview (https://www.clubdelphi.com/foros/showthread.php?t=36618)

Manuel 18-10-2006 18:28:41

dudas con respecto a treeview
 
hola amigos del foro, esto desarrollando algunas aplicaciones y me ha gustado trabajar con los treeview, de apoco e ido aprendiendo pero tengo algunas dudas.

creo en en tiempo de ejecución los nodos de mi árbol.

A--
|
|--B
|
|--C

Abuelo
padre
nieto

Todo ok, pero tengo dos dudas.

1.- como capturo el evento cuando el usuario hace un click en elemento C, para capturar ese valor para activar una querry.

2.- tengo las imagenes para cuando muestra y después selecciono. (Libro abierto, libro cerrado). ahora este cambio solo cuando seleccionano el nodo, pero tambien lo quiero cuando expanda la rama. (cada nodo tiene diferentes pares de imagenes de abierto y cerrado).

PD. trabajo delphi 5.0
gracias por su ayuda.

maeyanes 18-10-2006 18:35:44

Por lo primero, checa el evento OnChange del TreeView, este en uno de sus parámetros contiene el nodo que has seleccionado...

Para saber cual es el nivel del nodo, verifica la propiedad Level del nodo.

Sobre lo segundo, puedes usar los eventos OnCollapsed y OnExpanded, en estos eventos cambias el valor de ImageIndex del nodo que acabas de expandir o collapsar:

Código Delphi [-]
procedure TForm1.TreeView1OnCollapsed(Sender: TObject; Node: TTreeViewNode);
begin
  Node.ImageIndex := 0; // La imagen con index 0 es un libro cerrado
  Node.SelectedIndex := 0
end;

procedure TForm1.TreeView1OnExpanded(Sender: TObject; Node: TTreeViewNode);
begin
  Node.ImageIndex := 1; // La imagen con index 1 es un libro abierto
  Node.SelectedIndex := 1
end;


Saludos...

Manuel 19-10-2006 20:36:43

Gracias Marcos Yanes, me ha servido muchisimo


La franja horaria es GMT +2. Ahora son las 12:36:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi