Странное поведение TTreeView

[mutabor]

Прикрепил к дереву ImageList. При этом наблюдается странное поведение, узлам я назначил индекс картинки - 0, у потомков - 1, если выбираешь потомка, почему то у него картинка меняется на 0. Т.е. выходит у выбранного элемента картинка всегда 0, независимо от того какая она ему назначена, у тех элементов у к-рых другие индексы то же самое - при выборе показывается нулевая картинка.
Подскажите кто знает, как с ним бороться?

[KORN]

попробуй так:

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  Node.ImageIndex := TreeView1.Selected.ImageIndex;
  Node.SelectedIndex := TreeView1.Selected.ImageIndex;
end;