كيف جعل label تعمل بالاعداد العشرية

[DOSDOS]

اخواني لو ممكن حل لهاي مشكلة ما تضبط معي في label انو يظهر الاعداد اللي فيه على شكل عشري مثل : 250.00

[nabilkeb]

؟؟؟؟؟ أرفق ملف للتوضيح ، أين ظهر لك فيه هذا المشكل

[الكاسر الآخر]

الحل بسيط

كود :

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

بشرط ان يكون label يحتوي على ارقام

[DOSDOS]

لم تنجح معي هذا مثال للكود الذي اعدل عليه

كود :

Label4.Caption:=floattostr(strtofloat(Label1.Caption) + strtofloat(Label2.Caption) - strtofloat(Label3.Caption));

[nabilkeb]

لم تنجح معي هذا مثال للكود الذي اعدل عليه

كود :

label4.caption:=floattostr(strtofloat(label1.caption) + strtofloat(label2.caption) - strtofloat(label3.caption));

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

[الكاسر الآخر]

لقد نسيت أن تكتب جملة FormatFloat

كود :

Label4.Caption:=FormatFloat('###.00',(strtofloat(Label1.Caption) + strtofloat(Label2.Caption) - strtofloat(Label3.Caption)));

[DOSDOS]

لقد نسيت أن تكتب جملة FormatFloat

اجل فعلت هذا لكن يظهر لي خطا لان Label1 Label2 Label3 ايضا قمت بتحويلهما للعشري ايضا :confused::confused:

[AgroSoft]

من ناحيتي لم افهم ممكن توضح اكثر او انتظر احد الاخوان لعله فهم ما تريد .... تحياتي.

[الكاسر الآخر]

ممكن أخي ترسل لي رسالة الخطأ - صورة لو أمكن
لأن الكود صحيح مئة بالمئة

[DOSDOS]

مرحبا هل يمكن تصحيح لهذا الكود استخدمه حتى احصل على مجموع الضريبة الذي كما نعلم جميعا مجموع الفاتورة * 0.17

كود :

Text20.Text:=floattostr(strtofloat(DataText10.Text) * strtofloat('0.17'));