Aqui tienes un ejemplo sencillo
Siempre puedes basarte en el nodo Selected asegurandote que hay alguno seleccionado (selected <> nil)
Código Delphi
[-]
procedure TForm1.TreeView1Click(Sender: TObject);
begin
with TreeView1 do
if Selected <> nil then
if Selected.Text = 'mexico' then
ShowMessage(' estoy en mexico');
end;
Saludos