delphi4arab منتديات دلفي للعرب
كيف جعل label تعمل بالاعداد العشرية - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف جعل label تعمل بالاعداد العشرية (/showthread.php?tid=6787)

الصفحات: 1 2 3

كيف جعل label تعمل بالاعداد العشرية - nabilkeb - 11-03-2015

0,17 أصلا Float

كود :
Edit2.Text:=FloatToStr( StrToFloat(Edit1.Text) * 0,17 );
لعدم الخوض في شكل الفاصلة و التخلص من أي إشكال محتمل(و ببساطة) :
كود :
Edit2.Text:=FloatToStr( StrToFloat(Edit1.Text) * 17/100 );
ملاحظة: عند طرح إشكال (هنا أو بمشاركاتك الأخرى ) محاولة إيصال الفكرة بأسهل الطرق و ليس بالضرورة استعمال أسماء العناصر الأصلية ببرنامجك ، من الممكن أيضا في حالات معينة إنجاز مثال مقتبس عن الإشكالية المطروحة من خلال مشروعك و إرفاق السورس ، لتأخذ الإجابة الصحيحة بأقصر الطرق و [U]مســـاعـــدة من يحاول مساعدتك

بالتوفيق أخي العزيز
[/U]

كيف جعل label تعمل بالاعداد العشرية - nabilkeb - 11-03-2015

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

كود :
text20.text:=floattostr(strtofloat(datatext10.text) * strtofloat('0.17'));

للإشارة : حتى هذا الكود ، صحيح ، ربما تواجه مشكل يتعلق بشكل الفاصلة

(على شكل نقطة (.) أو فاصلة (,) )

كيف جعل label تعمل بالاعداد العشرية - DOSDOS - 11-03-2015

لكن للعلم انا ساقوم بهذه العملية داخل rave report وليس داخل دالفي
على العموم ساجرب بالمساء واخبرك بالنتيجة

كيف جعل label تعمل بالاعداد العشرية - DOSDOS - 11-03-2015

كود :
http://www8.0zz0.com/2015/03/11/23/987145380.png
بعد التجربة ظهر لي هذا الخطا :confused::confused::confused:

كيف جعل label تعمل بالاعداد العشرية - أبو معاذ - 12-03-2015

DOSDOS كتب :
كود :
http://www8.0zz0.com/2015/03/11/23/987145380.png
بعد التجربة ظهر لي هذا الخطا :confused::confused::confused:

نعم ،
لاحظ أخي انه هناك مسافة تفصل بين الآلاف و المئات
ف : 32000 عندما يريد تحويلها إلى Float ليس هناك إشكال.
أما 000 32 فالفرق واضح. (لاحظ المسافة بين 32 و 000)
فعوضا أن تستعمل datatext10.text استعمل الحقل الموصل ب datetext10 مباشرة.

كيف جعل label تعمل بالاعداد العشرية - DOSDOS - 12-03-2015

الاخ Unprogramme لعلمك المسافة تلك ياخذها المكون datatext10 من الحقل نفسه
وهل ممكن توضيح اكثر كيف استغني عن المكون واربطه بالحقل مباشرة ؟؟؟

كيف جعل label تعمل بالاعداد العشرية - أبو معاذ - 12-03-2015

[INDENT]
DOSDOS كتب :الاخ Unprogramme لعلمك المسافة تلك ياخذها المكون datatext10 من الحقل نفسه
وهل ممكن توضيح اكثر كيف استغني عن المكون واربطه بالحقل مباشرة ؟؟؟


أليس المكون datatext10 مربوط بسجل من قاعدة البيانات ؟
إذن استعمل القيمة سجل المربوط مباشرة .
[/INDENT]

كيف جعل label تعمل بالاعداد العشرية - DOSDOS - 12-03-2015

للاسف اخي لم استوعب الفكرة التي تريد اصالي لها لو امكن تكتب لي الكود او تعطيني مثال

كيف جعل label تعمل بالاعداد العشرية - أبو معاذ - 12-03-2015

[INDENT]
أخي الحبيب ،
DataText10.Text من أين يأخذ القيمة ؟
[/INDENT]

كيف جعل label تعمل بالاعداد العشرية - DOSDOS - 12-03-2015

من dataview1 عمود total