Código fuente de Delphitreeview
Obtenga si el nodo actualmente seleccionado del control TreeView es un nodo secundario a través del miembro de atributo principal del nodo (TTreeNode). Si hay un nodo principal, significa que el nodo actual es un nodo secundario.
Obtenga el texto de TTreeNode, ¿se puede acceder directamente? Propiedades del texto.
El código de muestra es el siguiente:
¿Programa? TForm1.btn1Click(remitente:?al objeto);
var? Artículo actual:? TTreeNode
Iniciar
CurItem? :=?tv1. Seleccionado;
¿Si? ¿Artículo actual? ¿Es gt? ¿cero? Entonces
Comenzar
¿Y si? Artículo actual. padre lt gt cero? Luego
ShowMessage('El nodo secundario está actualmente seleccionado, contenido: '? ?CurItem. Text)
Otros
ShowMessage('El nodo principal está actualmente seleccionado, Contenido: '?CurItem.)
Fin;
Captura de pantalla del código en ejecución: