22-03-2016, 11:08 AM
السلام عليكم ورحمة الله
لقد استعملت عدة محاولات في التعديل على الكود
الا انني قد يبدو لي قد وصلت الى الحل من خلال هذا التعديل والمطلوب المطالعة على التعديل وابداء رأيكم
التعديل هو بدلا من استعمال strtoint استعملت strtoint64 كما اطلب منكم توضيح الفرق بين strtoint و strtoint64 واين تستعمل
وهل استعمالها بدلا من strtoint عادي حتى في التحويلات الصغيرة ام لا؟
لقد استعملت عدة محاولات في التعديل على الكود
الا انني قد يبدو لي قد وصلت الى الحل من خلال هذا التعديل والمطلوب المطالعة على التعديل وابداء رأيكم
التعديل هو بدلا من استعمال strtoint استعملت strtoint64 كما اطلب منكم توضيح الفرق بين strtoint و strtoint64 واين تستعمل
وهل استعمالها بدلا من strtoint عادي حتى في التحويلات الصغيرة ام لا؟
كود :
tMtn1 := format('%.13d',[strtoInt64(ExtractNumberInString(formatfloat('0.00',TBS2.fieldvalues['MT_NET'])))]);
showmessage(tMtn1 );
Memo1.Add('*00000000'+format('%.10d',[strtoint(TBS2.FieldValues['Cpte_Tr'])])+
TBS2.FieldValues['Cle']+tMtn1+
format('%.7d',[strtoint(TBS2.FieldValues['Effectif'])])+
TBS2.FieldValues['MOIS']+concatblanch(TBS2.FieldValues['ANNEE'])+'0');
