delphi4arab منتديات دلفي للعرب
كيف امحي قيم اكثر من edit بضغطة زر - نسخة قابلة للطباعة

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



كيف امحي قيم اكثر من edit بضغطة زر - yahia1921 - 22-01-2010

السلام عليكم ورحمة الله
صادفني كود يمحي قيم اكثر من edit دفعة واحدة وهو كالتالي :
كود :
begin for i:=0 tocomponentcount - 1 do if ([color=Red]component[/color][i] is Tedit) then (component[i] as Tedit).clear ; end;

هل هذا الكود صحيح لاني جربته ولم يصلح معي


كيف امحي قيم اكثر من edit بضغطة زر - kachwahed - 22-01-2010

وعليكم السلام ورحمة الله
الحلقة سليمة، أين الخلل؟
كود :
for i:=0 to ComponentCount - 1 do if (Components[i] is TEdit) then (Components[i] as TEdit).Clear;



كيف امحي قيم اكثر من edit بضغطة زر - yahia1921 - 22-01-2010

المشكل يا اخي انه لا ينفذ
تظهر علامة المؤشر في كلمة component الملونة في الاعلى
مع العلم اني استعمل دلفي7


كيف امحي قيم اكثر من edit بضغطة زر - me_delphi - 22-01-2010

تأكد من وجود الوحدة في uses


كيف امحي قيم اكثر من edit بضغطة زر - yahia1921 - 22-01-2010

me&delphi' كتب :تأكد من وجود الوحدة في uses

ما اسم هذه الوحدة اخي الكريم هل هي موجودة


كيف امحي قيم اكثر من edit بضغطة زر - kachwahed - 22-01-2010

إقتباس :تظهر علامة المؤشر في كلمة [COLOR="Red"]component الملونة في الاعلى
أكتب رسالة الخطأ بالتحديد: "undeclared identifier"
معك حق لأنها Components وليست Component Smile
تم تصحيح الكود السابق.
الآلات:= منضبطة وحمقاء :oops:[/COLOR]


كيف امحي قيم اكثر من edit بضغطة زر - yahia1921 - 22-01-2010

حقيقة يعجز لساني عن التعبير وشكركم
مشكورين في الحقيقة اخي ملاحظتك في محلها


كيف امحي قيم اكثر من edit بضغطة زر - me_delphi - 22-01-2010

إقتباس :الآلات:= منضبطة وحمقاء

:laugh: لا أخي كاش واحد وانما كل شيء خاضع للمنطق