delphi4arab منتديات دلفي للعرب
ماطريقة تحديد لون Item في Listview؟ - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ماطريقة تحديد لون Item في Listview؟ (/showthread.php?tid=4421)

الصفحات: 1 2


ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 04-08-2012

السلآم عليكم ورحمة الله وبركاته ...

ماهي طريقة تحديد لون الايتيم الذي ادخله في ليست فيو عن طريق الضغط على بوتون معين
فيقوم بأدخاله ملون مثلا احمر
وجزاكم الله كل خير


ماطريقة تحديد لون Item في Listview؟ - Agmcz - 04-08-2012

وعليكم السلام
يمكن وضع مكون ColorBox
واستعمال شيء مثل
كود :
var LI: TListItem; begin ListView1.Font.Color := ColorBox1.Selected; LI := ListView1.Items.Add; LI.Caption := 'Delphi4Arab'; end;



ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 05-08-2012

مشكور اخي

لو رغبت أن اضع خطاً تحت الاسم في Listview الذي يطابق الاسم في Edit كيف

ومشكور اخي تعبتك معي


ماطريقة تحديد لون Item في Listview؟ - Agmcz - 05-08-2012

يكفي شيء مثل
كود :
ListView1.Font.Style := [fsUnderline];



ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 05-08-2012

اولاً شكراً لك اخي ..

لكن فهمتني خطأ لقد قصدت شيء اخر مثل

خطاً تحت ايتيم معين وليس كل الليست فيو جزاك الله كل خير اخي..


ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 05-08-2012

اخي مواجهت مشكلة في الكود الخاص باللون وهي انه يتم تغير لون كل الايتيم الموجود في الليست فيو وليس لون ايتم محدد جزاك الله كل خير


ماطريقة تحديد لون Item في Listview؟ - Agmcz - 05-08-2012

في الحدث AdvancedCustomDrawItem
ضع
كود :
if Item.Caption = 'Delphi4Arab' then begin Sender.Canvas.Font.Color := ColorBox1.Selected; Sender.Canvas.Font.Style := [fsUnderline]; end;
إدا كانت السلسلة التي ستضاف تساوي Delphi4Arab
فانه سيغير اللون و ستايل الخط


ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 05-08-2012

مشكور اخي وجدت الحل جزاك الله كل خير

كود :
if SubItem = 3 then if (Item.SubItems.Strings[3] = 'Delphi4Arab') then Sender.Canvas.Font.Style :=Sender.Canvas.Font.Style+[fsUnderline];

هذا الحل مشكور مرة اخرة


ماطريقة تحديد لون Item في Listview؟ - M_Mori2010 - 05-08-2012

اخي الكريم : كيف يمكنني ان اعدل اللون في حال التشغيل بمعنى اخر عندما ادخل الاسم في Edit ويكون مطابق لأحد الاسماء في Listview يثوم بتلوينه عملياً انني استخدم Edit كحوار بحث وعندما اضغط على بوتون بتلوين المطابق له ويبقى اللون ثابت على الذي بحثت عنه جزاك الله كل خير


ماطريقة تحديد لون Item في Listview؟ - Agmcz - 05-08-2012

ممكن توضح أكثر + أرفق مثال