компонент treeview

[xmaksimca]

Здравствуйте уважаемые программисты. С помощью компонента treeview я делаю содержание для электронного учебника, но вот только не могу пока разобраться как правильно работать с этим компонентом. Суть в том чтобы при клике мышью на какомнибуть узле к примеру "Бугалтерия", в поле "memo" выводилась информация о бугалтерии. Я прописываю вот такой код, но программа всё равно не работает правильно.

procedure TForm2.Memo1Change(Sender: TObject);
begin
case
treeview1.Selected.AbsoluteIndex of
0:memo1.Lines.LoadFromFile('путь к файлу');
end;

Заранее огромное вам спасибо!

У нас принято оформлять код специальным тэгом - кнопочка "#".
Модератор

[psycho-coder]

Может нужно не в Memo1Change, а в TreeView1Click?

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  case
    treeview1.Selected.AbsoluteIndex of
    0:memo1.Lines.LoadFromFile('file');
  end;
end;

[mihali4]

Предложенное psycho-coder - это раз.
Только я бы организовал через TreeView1DblClick(Sender: TObject);

Второе - а откуда вы будете брать путь к файлу? Прописывать "намертво" в программе?
У каждой ветви дерева (ноды) есть дата-свойство, в котором можно хранить хоть "черта лысого"... Не то что пути...
Организуется сие волшебство при помощи TreeView.Items.AddObject().
Ну, и в обязательном порядке понадобится TreeView1.Selected...
Подробно можете посмотреть в хэлпе - там есть примеры.