كيف جعل label تعمل بالاعداد العشرية
#1
اخواني لو ممكن حل لهاي مشكلة ما تضبط معي في label انو يظهر الاعداد اللي فيه على شكل عشري مثل : 250.00
الرد
#2
؟؟؟؟؟ أرفق ملف للتوضيح ، أين ظهر لك فيه هذا المشكل
الرد
#3
الحل بسيط

كود :
label1.Caption := formatfloat('####.00',StrToFloat(label1.Caption));

بشرط ان يكون label يحتوي على ارقام
الرد
#4
لم تنجح معي هذا مثال للكود الذي اعدل عليه
كود :
Label4.Caption:=floattostr(strtofloat(Label1.Caption) + strtofloat(Label2.Caption) - strtofloat(Label3.Caption));
الرد
#5
dosdos كتب :لم تنجح معي هذا مثال للكود الذي اعدل عليه
كود :
label4.caption:=floattostr(strtofloat(label1.caption) + strtofloat(label2.caption) - strtofloat(label3.caption));

أنت تحكي عن فورمة لعدد الحقيقي (شكله) إن رقمين بعد الفاصلة
الكود الممنوح صحيح و يفي بغرضك ، عليك بتجريبه إذا كان هذا هو مقصودك
الرد
#6
لقد نسيت أن تكتب جملة FormatFloat

كود :
Label4.Caption:=FormatFloat('###.00',(strtofloat(Label1.Caption) + strtofloat(Label2.Caption) - strtofloat(Label3.Caption)));
الرد
#7
الكاسر الآخر كتب :لقد نسيت أن تكتب جملة FormatFloat

اجل فعلت هذا لكن يظهر لي خطا لان Label1 Label2 Label3 ايضا قمت بتحويلهما للعشري ايضا :confused::confused:
الرد
#8
من ناحيتي لم افهم ممكن توضح اكثر او انتظر احد الاخوان لعله فهم ما تريد .... تحياتي.
لا تقل ان هذا شيء كبير ففي الاصل هو اتى من شيء صغير Smile
الرد
#9
ممكن أخي ترسل لي رسالة الخطأ - صورة لو أمكن
لأن الكود صحيح مئة بالمئة
الرد
#10
مرحبا هل يمكن تصحيح لهذا الكود استخدمه حتى احصل على مجموع الضريبة الذي كما نعلم جميعا مجموع الفاتورة * 0.17

كود :
Text20.Text:=floattostr(strtofloat(DataText10.Text) * strtofloat('0.17'));
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم