السلام عليكم ورحمة الله وبركاته
يااخواني اريد مساعدة من فضلكم
اليكم الكود التالي
var a,b,c:real;
begin
a:= strtofloat(edit1.text);
b:= strtofloat(edit2.text);
c:=a/b;
edit3.text:=floattostr©;
end;
اريد أن ظهر في النتيجة رقمين بعد الفاصلة فقط مثال
c:=12.0123644 اذا كانت
c:= 12.01 اريد ان تظهر النتيجة
ساعدوني من فضلكم
السلام عليكم...
إذا كنت تريد إظهار الكسر دائماً حتى و إن كان صفراً (مثلاً 12.00):
Edit3.Text := FormatFloat('0.00', c);نرجو الاستفادة و السلام.
وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ
صدق الله العظيم
السلام عليكم ورحمة الله وبركاته
جرب الكود التالي:
var a,b,c:real;
begin
a:= strtofloat(edit1.text);
b:= strtofloat(edit2.text);
c:=a/b;
edit3.text:=floattostrf(c,ffnumber,18,2);
end;
أطلب العم من المهد إلى اللحد
السلام عليكم
استعمل Format أو Formatfloat
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…