اضافه کردن عکس به TreeView

[www2006]

سلام

یک TreeView داریم که نودهای آن را از یک جدول از بانک ، تک تک اضافه میکنیم ... چطور میتوان برای هر کدام از نودها ( هنگامی که اضافه میشوند) یک عکس هم قرار داد ؟

(توضیح : برای آیکن های مورد نظر هم یک ImageList روی فرم گذاشتم و عکسهای مورد نظر را در آن قرار دادم و به TreeView هم متصل کرده ام )

در واقع مشکل این است که در دستور :






Root := Tree.Items.AddChild(nil,VarToStr( table_groups.Fields[1].Value)) ;
Tree.Items.Item[؟].ImageIndex := 1 ;


بجای علامت سوال نمیدانم باید چه عددی قرار داد ...

با تشکر

[vcldeveloper]

متد AddChild یک شی TTreeNode برمی گردونه که می تونید از اون برای دسترسی به Node ایجاد شده استفاده کنید.


var
ANode : TTreeNode;
begin
ANode := TreeView1.Items.AddChild(nil,'New Node');
ANode.ImageIndex := 1;
end;

[www2006]

ممنون استاد .... یه تشکر طلبت ..( محدودیت جدید سایته .. چه میشه کرد )