+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13)
+--- الموضوع : التعامل مع الجمل الشرطية في دلفي (/showthread.php?tid=6310)
التعامل مع الجمل الشرطية في دلفي - rahiche - 10-07-2014
السلام عليكم و رحمة الله تعالى و بركاته
أعضاء و زوار منتدى دلفي للعرب اليوم قمت بكتابة موضوع يتحدث عن التعامل مع الجمل الشرطية. مرفق شكل pdf
التعامل مع الجمل الشرطية في دلفي - didrosoft - 13-07-2014
عمل ممتاز واصل اخي الفاضل
التعامل مع الجمل الشرطية في دلفي - rahiche - 14-07-2014
بارك الله فيك يا أخي
التعامل مع الجمل الشرطية في دلفي - yami - 23-10-2014
بارك الله فيك يا أخي
التعامل مع الجمل الشرطية في دلفي - ELARAPY - 23-10-2014
بارك الله فيك
التعامل مع الجمل الشرطية في دلفي - rahiche - 30-12-2014
yami كتب :بارك الله فيك يا أخي
\لاشكر على واجب
RE: التعامل مع الجمل الشرطية في دلفي - aljathmi - 14-08-2021
السلام عليكم ورحمة الله وبركاته
اخواني انا عضو مبتدي جيت انهل من بحركم الطامي
طبقت الطريقة الاولى وما ضبطت ممكن احد يشوف وين المشكلة.
RE: التعامل مع الجمل الشرطية في دلفي - أبو معاذ - 14-08-2021
(14-08-2021, 12:38 AM)aljathmi كتب : السلام عليكم ورحمة الله وبركاته
اخواني انا عضو مبتدي جيت انهل من بحركم الطامي
طبقت الطريقة الاولى وما ضبطت ممكن احد يشوف وين المشكلة.
وعليكم السلام ورحمة الله وبركاته.
أهلا وسهلا معك بيننا.
أنت استعملت الكود التالي :
PHP كود :
if Edit1.text<='10' then
Shape1.Brush.color:=clred;
if Edit1.text>='11' then
Shape1.Brush.color:=clyellow;
if Edit1.text<='15' then
Shape1.Brush.color:=clyellow;
if Edit1.text>='16' then
Shape1.Brush.color:=cllime;
if Edit1.text<='20' then
Shape1.Brush.color:=cllime;
الأخطاء الموجودة في الكود هي :
1-المقارانات المنطقية <= و >= لا يمكن استعمالها في حالتك.
فيجب تحويل قيمة Edit1 إلى نوع رقمي. فنكتب :
if StrToint(Edit1.text) <= 10 then
هذا من جهة ، و من جهة أخرى ما لو كانت قيمة Edit1 هي 8 ، أي شرطط سيتحقق.
ف 8 <=10
8 <=15
8 <=20
لإذن عليك استعمال if then else.
RE: التعامل مع الجمل الشرطية في دلفي - ferrero - 16-08-2021
(14-08-2021, 12:38 AM)aljathmi كتب : السلام عليكم ورحمة الله وبركاته
اخواني انا عضو مبتدي جيت انهل من بحركم الطامي
طبقت الطريقة الاولى وما ضبطت ممكن احد يشوف وين المشكلة.
PHP كود :
var
i: integer;
begin
i := StrToInt(Edit1.text);
case i of
0 .. 10:
Shape1.Brush.color := clred;
11 .. 15:
Shape1.Brush.color := clyellow;
16 .. 20:
Shape1.Brush.color := cllime;
end;
RE: التعامل مع الجمل الشرطية في دلفي - aljathmi - 16-08-2021
لكم كل الشكر والتقدير والاحترام.. وفقكم الله.