المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : كيف امحي قيم اكثر من edit بضغطة زر

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

هل هذا الكود صحيح لاني جربته ولم يصلح معي
kachwahed
22-01-2010, 09:09 PM
وعليكم السلام ورحمة الله
الحلقة سليمة، أين الخلل؟
for i:=0 to ComponentCount - 1 do
if (Components[i] is TEdit) then
(Components[i] as TEdit).Clear;
yahia1921
22-01-2010, 09:14 PM
المشكل يا اخي انه لا ينفذ
تظهر علامة المؤشر في كلمة component الملونة في الاعلى
مع العلم اني استعمل دلفي7
me&delphi
22-01-2010, 09:25 PM
تأكد من وجود الوحدة في uses
yahia1921
22-01-2010, 09:27 PM
تأكد من وجود الوحدة في uses

ما اسم هذه الوحدة اخي الكريم هل هي موجودة
kachwahed
22-01-2010, 09:34 PM
تظهر علامة المؤشر في كلمة component الملونة في الاعلى
أكتب رسالة الخطأ بالتحديد: "undeclared identifier"
معك حق لأنها Components وليست Component :)
تم تصحيح الكود السابق.
الآلات:= منضبطة وحمقاء :oops:
yahia1921
22-01-2010, 09:42 PM
حقيقة يعجز لساني عن التعبير وشكركم
مشكورين في الحقيقة اخي ملاحظتك في محلها
me&delphi
22-01-2010, 09:49 PM
الآلات:= منضبطة وحمقاء

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