دخول

saber-bsa · 16-04-2010, 11:28 PM

[FONT=Microsoft Sans Serif]السلام عليكم ورحمة الله وبركاته

كيف ألون محتوى Edit
بالشرط الذي احدده
أضع فيها ارقام من 0 إلى 10
إذا كان الرقم تحت 5 يكون أحمر
إذا كان 5 فاكثر يكون اخظر

manoubi77 · 17-04-2010, 12:08 AM

تضيف "boutton" تضع به

كود :
if strtoint(edit1.Text)<=5 then
begin
edit1.Color:=ClRed;
end
else if strtoint(edit1.Text)<10 then
begin
edit1.color:=ClLime;
end

saber-bsa · 17-04-2010, 10:19 AM

السلام عليكم
بارك الله فيكم شباب
لقد تم إيجاد طريقة لما ذكرته سابقا
وهي بوضع الكود الذي زودني به الأخ الكريم
manoubi77
في خاصية عند التغيير للـ edit
:monster1:

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة