lineas en Ttreeview

[delphi.com.ar]

Voy a extender un poquito lo que escribieron anteriormente:
Selected devuelve el TTreeNode seleccionado, en el caso de que no haya seleccionado ningún nodo, retorna nil, lo que producirá un error si utilizas directamente TreeView1.Selected.Text. Como ventaja puedes utilizar cualquiera de todas las propiedades de un TTreeNode como te muestran anteriormente.

var
  Nodo : TTreeNode;
begin
  Nodo := TreeView1.Selected;
  if Assigned(Nodo) then
  begin
     ...
  end
end;