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

نسخة كاملة : استفسار عن الجملة المشروطه if
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2 3 4 5
السلام عليكم ورحمة الله وبركاته


ماذا اكتب لتحديد عده شروط ب if

في المثال
كود :
if Edit1.Text= ('محمد عربي') then Button1.Enabled:=False else Button1.Enabled:=True;


الشرط ان يكون ال Text محمد عربي

كيف اضيف اكثر من نص

ان يكون الشرط هو محمد عربي او طارق او احمد

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

هل يوجد ما يعادل كلمة (و) في دلفي( &)

أسف على كثرة المواضيع لأني لا املك التعديل على الموضوع السابق إلا خلال عشرة دقائق
محاولة بسيطة وقم بتعديلها


PHP كود :
begin

         
if Edit1.Text= ('a') then
      Button1
.Visible:=false ;
          if  
Edit1.Text= ('b') then
          Button1
.Visible:=false ;
          if  
Edit1.Text= ('c') then
      Button1
.Visible:=false
       
else
       
Button1.Visible:=True;

end; 
وعليكم السلام ورحمة الله

عليك بتعلم اساسيات لغة باسكال Pascal تصفح قسم الكتب

نعود للاستفسار، الامور بسيطة كما تفكر، كون جملة عربية، ترجمها للانجليزية، غير الكلمات بما يوافق بباسكال
الكود المكوتوب فوق يرادف:
اذا كان النص المدخل محمد عربي لا تفعل الزر1 وان لم يكن فعل الزر1
حسنا
الان كيف تضيف "أو" بالانجليزية Or
بنفس المنطق تصبح
كود :
if Edit1.Text= ('محمد عربي') or Edit1.Text= ('طارق') or Edit1.Text= ('احمد') then Button1.Enabled:=False else Button1.Enabled:=True;
louay كتب :محاولة بسيطة وقم بتعديلها
لا يعمل
في كل الحالات النتيجه Button1.visible:=False
ان كان المثال صحيح فلو كتبت حرف f مثلا كان المفتاح ظهر لكن اي نص لا يظهر المفتاح
شكرا اخي
B.M.AbdelAziZ كتب :الان كيف تضيف "أو" بالانجليزية Or
بارك الله فيك انا لم اجرب الكود الي حضرتك وضعته
كنت اسأل عن شئ وحضرتك وضعته الا وهو or
استاذ عبد العزيز الكود لا يعمل معي

هل من حل ؟؟؟

الكود كان مثال عن استخدام or
الان عندما تقول لا يعمل لم توضح شيئ
ما الذي لم يعمل ؟ وما المفروض تكون النتيجة عندما يعمل ؟
اطرح سؤال محدد
الأمر يتعلق بالرموز المنطقية , Or/And/Xor/Not ......
- يجب تحديد الشرط (Boolean) , هكذا :
PHP كود :
if (Edit1.Text= ('محمد عربي'))
or (
Edit1.Text= ('طارق'))
or (
Edit1.Text= ('احمد'))
then Button1.Enabled:=False
else Button1.Enabled:=True; 
بالتوفيق,,
B.M.AbdelAziZ كتب :
الكود كان مثال عن استخدام or
الان عندما تقول لا يعمل لم توضح شيئ
ما الذي لم يعمل ؟ وما المفروض تكون النتيجة عندما يعمل ؟
اطرح سؤال محدد

لا يعمل اقصد بها الكومبايلر يظهر رساله خطأ وطبعا لا يوجد Run

اقصد ايضا انه يوجد شئ ناقص بالكود

اما النتيجه المراده هي اظهار او اخفاء المفتاح لكن البرنامج لم يعمل من الاساس

بارك الله فيك استاذ عبد العزيز على المتابعات
TF6M كتب :الأمر يتعلق بالرموز المنطقية , Or/And/Xor/Not ......
- يجب تحديد الشرط (Boolean) , هكذا :
PHP كود :
if (Edit1.Text= ('محمد عربي'))
or (
Edit1.Text= ('طارق'))
or (
Edit1.Text= ('احمد'))
then Button1.Enabled:=False
else Button1.Enabled:=True; 
بالتوفيق,,

بارك الله فيك اخي

الكود يعمل بدون مشاكل

لكن لحظه لا تدعني امر على هذا الامر بدون ان أأخذ اي معلومه

لماذا يجب تحديد الشرط Boolean ?
الصفحات : 1 2 3 4 5