procedure TForm1.sTreeView1DblClick(Sender: TObject);
begin
ShowMessage(sTreeView2.Items.Item[sTreeView1.Selected.SelectedIndex].Text);
end;Но выводит оно всегда заголовок самого первого пункта, где бы ни кликать.
procedure TForm1.sTreeView1DblClick(Sender: TObject);
begin
ShowMessage(sTreeView2.Items.Item[sTreeView1.Selected.SelectedIndex].Text);
end;