![]() |
|
مشكلة في العمليات الحسابية - نسخة قابلة للطباعة +- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum) +-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3) +--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15) +--- الموضوع : مشكلة في العمليات الحسابية (/showthread.php?tid=3365) |
مشكلة في العمليات الحسابية - السندبااد - 20-08-2011 السلام عليكم ورحمة الله وبركاته حاولت القيام بعملية الجمع في الدلفي ولكن كان دوماً يعطيني خطأ فهمت من الخطأ أني أجمع String مع Integer ولكن الأمر ليس كذلك تكرموا بالنظر للمرفق المسمى جمع لشتاهدوا أيضاً المرفق الثاني salary هو عملية بسيطة لحساب زيادة الراتب بعد منحة معينة وهو واضح ولكنه أيضاً يعطيني أخطاء وتقبل الله صيامكم وقيامكم مشكلة في العمليات الحسابية - cargem - 20-08-2011 اعمل كذا Edit1.Text :=IntToStr(5+5) ; مشكلة في العمليات الحسابية - السندبااد - 20-08-2011 cargem كتب :اعمل كذاجزاك الله خيراً طيب بالنسبة للمرفق الثاني salary تظهر نفس المشكلة تماماً وجربت ما تفضلت به فلم ينفع الحل !!! مشكلة في العمليات الحسابية - محمد عبد العزيز - 20-08-2011 وعليكم السلام ورحمة الله اخي السندباد راجع الدرس الاول من دورة دلفي للعرب http://www.delphi4arab.net/forum/forumdisplay.php?f=27 ما هو مكتوب بالedit نص ويبقى كذلك لتتعامل معه كقيمة وليس نص عليك بالتحويل من نص الى قيم ثم بعد القيام بالعمليات الحسابة حوله الى نص مرة اخرى قبل عرضه مثال لديك مكون edit وكتبت به القيمة 5 عند الضغط على الزر تتضاعف لو كتبت الكود التالي بمكون زر كود : Edit1.text:=edit1.text+edit1.text;لانك تاخذ النص '5' وتضيف اليه النص '5' و النتيجة النص '55' الصحيح كما سبق تحويل النص '5' الى قيمة 5 و استخدامها ومنه يصبح الكود الصحيح كود : Edit1.text := IntTostr( StrtoInt(Edit1.text)+ StrToInt(Edit1.Text) );كود : var
x : integer;
Begin
x := StrToInt(Edit1.text);
x := x + x;
Edit1:= IntToStr(x);
end;مشكلة في العمليات الحسابية - السندبااد - 21-08-2011 بارك الله فيك أستاذي الحبيب B.M.AbdelAziZ الآن وصلت الفكرة ![]() تقبل الله صيامكم وقيامكم مشكلة في العمليات الحسابية - محمد دوب - 02-09-2011 السلام عليكم الجواب عن الجمع كود : ;((EDIT3.TEXT:=FLOATTOSTR(strtofloat(EDIT1.TEXT)+strtofloat(EDIT2.TEXT |