Simplicidad ante todo.
Si todos los nodos tienen diferente texto y sabes el texto que buscas simplemente deberías hacer:
Código Delphi
[-]procedure TForm1.TreeView1Click(Sender: TObject);
begin
if TreeView1.Selected.Text:='Texto del nodo' then...
De otro modo si lo que deseas identificar al nodo por su nivel y número usarías:
Código Delphi
[-]procedure TForm1.TreeView1Click(Sender: TObject);
begin
if (TreeView1.Selected.Level =0) and (TreeView1.Selected.Index =0) then...
donde para identificar el nodo usas Level que es el nivel del nodo (0 para el primer nivel, 1 para el segundo y así sucesivamente) e index que es su ubicación en ese nivel (0 para el primer nodo de ese nivel, 1 para el segundo y sucesivamente).
Espero soluciones tu problema.