الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفم يتم دمج او جمع عددين مع بعض

مغلق
بدأه sa2004sa في 22 يناير 2008 · 4 رد · 778 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

مرحبا

عندى حقلين عبارة عن عددين

لفرض ان الاول فية القيمة 11 والثاني فية القيمة 12 اريد اجمعهم او ادمجهم بحيث يكون الناتج 1112 وليس النااتج 23 ملاحظة ان الحقول عددية وليست نصية لانى اعرف دمج النص

وشكرا

#2

حتى وان كانت عددية تعامل معها كانها نصية واجمعها فقط

مثلا جدول Table1 به حقلين Fld1 و Fld2 نجمع ونظر النتيجة باستخدام مثلا ShowMessage

ShowMessage(  Table1.FieldByName('Fld1').AsString + Table1.FieldByName('Fld2').AsString	);

والسلام عليكم ورحمة الله

d4baa0.gif
#3

تتم بكذا طريقه ..كما ذكر اخي اعلاه او بطريقه سهله كالتالي :

var
s,s1,s3:String;
begin
s3=s+s1;
end;

واذا كنت اعداد اي انتيقر تقدر تستخدم

var
I,I1:Integer;
s:String;
begin
s=IntToStr(i)+IntToStr(i1);
end;

تم تعديل هذه المشاركة بواسطة خالد عبدالكريم في 22 يناير 2008 في 22:02

بعض الحكي يحق له يجرح الصمت..والبعض الآخر ما يبرر ظهوري

#4

شكرا للجميع انا اعرف جمع النص كما قلت فى السوال ولكن مافى طريقة او رمز مثل رمز الجمع بين النصوص (&) او دالة لجمع الاعداد بدل التحميل الى نص ثم الجمع

#5

بامكانك عمل دالة للحصول على عدد الأرقام في العدد الثاني وليكن x ومن ثم تستخدم المعادلة الآتية:

c=a*power(10,x)+b

طبعاًَ ليس بالضرورة إستخدام هذه المعادلة فإذا كنت تعتمد الـ loop للحصول على x فبالإمكان معرفة العدد المراد ضربه بالعدد a ...

هنا a هو العدد الأول , b العدد الثاني , c ناتج الجمع . طبعاً يجب مراعاة كون الناتج لم يتعدى مجال نوع الأرقام المستخدم ...

ربما هناك طريقة أفضل ...

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

هذا الموضوع مغلق.

مواضيع مشابهة