Treeview, Компонент "Дерево" Опции

[Dead.MorozZ]

Помогите кто знает, как пользоваться "Деоевом". Мне нужно по клику на один из Item'ов, чтоб происходило событие

[volvo]

Ну, попытайся

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  if treeview1.Selected.Level = 1 then begin
    showmessage('that is level #1');
    label1.Caption := treeview1.selected.Text
  end;
end;

При клике на Root дерева никакой реакции, если кликнешь на первый уровень - будет сообщение...