Red de conocimiento informático - Computadora portátil - Código fuente de Delphitreeview

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: