المبرمج الجزائري

السلام عليكم جميعا مشكور أخي العزيز على المثال الرائع في تلوين lisview كما يمكننا كذلك جعل تناوب في تلوين الاسطر خاصة في حالة كون عدد الاسطر في القائمة متغيرا وليس محدودا كما فعلت بواسطة الامر case i of ونستخدم سطر واحد فقط لذلك كما يلي: if i mod 2 <>0 then Co…