Yo también utilizo un TjvCheckTreeView y no es muy diferente al TreeView, salvo la casilla de verificación, vamos, es lo mismo. Y con esto me ayudo mucho para manejar y obtener información de un nodo.
Código Delphi
[-]
type
PInfoNodo = ^TInfoNodo;
TInfoNodo = record
Caption: string;
ID: Integer;
end;
......
var InfoNodo: PInfoNodo;
.....
New(InfoNodo);
InfoNodo^.Caption := Nombre; InfoNodo^.ID := 1;
if TreeView.Selected.HasChildren then begin
Nodo := TreeView.Items.AddChildObject(TreeView.Selected, Nombre, InfoNodo);
end else begin
Nodo := TreeView.Items.AddObject(TreeView.Selected, Nombre, infoNodo);
end;
...
if (TreeView.Selected.Data <> nil) then begin
edtNodoCaption.Text := PInfoNodo(TreeView.Selected.Data)^.Caption;
edtNodoId.Text := IntToStr(PInfoNodo(TreeView.Selected.Data)^.ID);
end;
Saludos.