delphi4arab منتديات دلفي للعرب

السلام عليكم ورحمة الله وبركاته
لدي عدد محدد من ال button على الفورم واريد ان غير caption بحيث يحمل ام صنف معين مثلا عند ختيار ملابس رجال يتم وضع اسماء الملابس الرجالية على button وعند اختيار الملابس النسائية button يتم وضع اسماء الملابس النسائية وعند اختيار الاحذية يتم وضع اسماء الاحذية وهكذا
وجزاكم الله عنا خيرا

وعليكم السلام
من اين يتم تحديد الاختيارات؟ أم أن كل زر يحمل صنف؟

جزاك الله خيرا
علي سبيل المثال لو عندي عشر button على الفورم واريد ان اضع علي على هذه button اسماء السلع مثلا وليس بالضرورة ان يكون عدد ا لسلع 10 ربما 3 او 5 او غير ذلك لذا انا اريد استخدم loop بعدد السلع وداخل loop ايعامل مع اسم button على اساس انه string على النحو التالي

s=:'button '+i
بحيث نتعامل مع s وكأنها اسم button وليس بالضرورة ان تكون button ممكن ان تكون اي كوبنت اخر
المشكلة المذكورة يمكن حلها بواسطة ال case لكن ما اريده هو التعامل مع الكومبنت من خلال تحديد اسمه من داخل الكود

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

يمكن استخدام FindComponent
مثال لديك عشرة مكونات Button وتغير اسماء الخمسة الاخيرة

كود :
Var
 i: byte;
begin
For i:= 5 to 10 do
TButton(FindComponent('Button'+IntToStr(i))).Caption := 'Product '+IntToStr(i);
end;

جزاك الله خيرا

ابومنذر2007

لؤي

ابومنذر2007

محمد عبد العزيز

ابومنذر2007