Para agregar TTreeNodes en tiempo de ejecución, puedes hacerlo así:
Código Delphi
[-]
procedure TForm1.AddNode;
var
Node: TTreeNode;
begin
Node := TreeView1.Items.Add(nil, 'Primera');
TreeView1.Items.AddChild(Node, 'Uno');
TreeView1.Items.AddChild(Node, 'Dos');
end;
Para saber cual es el nodo que se selecciona al hacer click, usa el evento
OnChange. Este evento te deja saber cual es el nodo que se ha seleccionado.
Saludos...