Компонент TreeView

Discussion in 'Программирование' started by POL, Apr 23, 2005.

Thread Status:
Not open for further replies.
  1. POL

    POL Новичок

    21
    0
    компонент TreeView

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

    POL Новичок

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

    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;
     
Thread Status:
Not open for further replies.