حفظ آیکن مروبط به نود انتخاب شده

[mbshareat]

سلام علیکم
من یک ایمیج لیست و یک تری ویو در فرم گذاشتم.
این کد رو هم هنگام ایجاد نود ها دارم:
For I:=0 to Treeview1.Items.Count-1 Do
Treeview1.Items[I].ImageIndex:=Treeview1.Items[I].Level;


متاسفانه وقتی یک نود ( معادل فارسی داره؟) رو انتخاب می کنم، آیکن مربوط به اون موردانتخاب شده به اولین تصویر افزوده شده در ImageLis تبدیل میشه.حتی اگر در level دوم باشم.
این هم برنامه ام:153809

[mbshareat]

procedure TForm1.TreeView1GetSelectedIndex(Sender: TObject;
Node: TTreeNode);
begin
If TreeView1.Selected=nil then
Exit;
TreeView1.Selected.SelectedIndex:=TreeView1.Select ed.ImageIndex;
end;