Компонент TreeView

компонент TreeView

компонент TreeView
необходимо по OnChange получить в String Text выбраного Item ( SubItem )
нужно для открытия из дерева файлов по имени.

 

спасибо всем за внимание
сам все понял ( я автор вопроса ) :

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
var
DN : String;//dir name
FN : String;//file name
begin
DN := GetCurrentDir;
FN := TreeView1.Selected.Text;
WebBrowser1.Navigate(DN+'\Data\'+FN+'.htm');
end;