كيفية ربط ImageList مع ListView

[Moha711]

السلام عليكم
يسم الله الرحمن الرحيم
كيف لي ان اربط ImageList مع ListView في دلفي
و تظهر الايقونة بجنب ال Caption

PHP كود :

With AppsList.Items.Add Do
     Begin
     Caption := Reg.ReadString(L2.Strings[N]) ;
     If (P <> -1) Then SubItems.Add(Reg.ReadString(L2.Strings[P])) ;
     If (V <> -1) Then SubItems.Add(Reg.ReadString(L2.Strings[V])) ;
         
     iconHandle := ExtractIcon(Application.Handle,PChar(Path), 0) ;
     Icon.Handle := iconHandle;
     //Code ..
     Finally
     Icon.Free;
     End;
     End; 


هده الطريقة لم تجد نفعا

[kachwahed]

وعليكم السلام ورحمة الله
للنمط TListView ثلاث خصائص لربطه بمكون الصور TImageList في ثلاث وضعيات مختلفة:
StateImages
SmallImages
LargeImages
تتناسب مع شكل العرض ViewStyle
يمكنك أيضا تخصيص صورة لكل عمود Column، بتحديد عمود ثم اختيار ImageIndex.
موفق.

[Moha711]

شكرا اخي كاش واحد
لكنني اعرف هده الاشياء
كيف يتم وضع الصور في ال Image List تم من بعد ربطه با ListView
كمثال : برامج ال startup manager تضيف ايقونة الرنامج الى العنصر

[kachwahed]

استخدم أحداث الرسم لتحديد رقم الصورة:

PHP كود :

ListView1.Items[0].SubItemImages[0] := 1; 


[Moha711]

ستتعب معي اخي كاش واحد
انا خلاص قمت بجلب الصور و حفظهم في IconList من نوع ImageList
ولدي AppsList من نوع ListView **** ان ارفق لكل Item ايقونته الخاصة
طريقتك تعطي لل SubItem و ليس لل Item
هل هناك طريق اخرى

[Lam.Abdeldjalil]

و عليكم السلام ورحمة الله

لتحديد صور الـ Item برمجيا

كود :

ListView1.Items[0].ImageIndex :=0;

بالتوفيق

[kachwahed]

طريقتك تعطي لل SubItem و ليس لل Item

ذكرتها سابقا، يكفي تحديد الصور من SmallImages
المثال المرفق يضع الصور في كل مكان وفيه أشياء أخرى...
بالتوفيق.