[aftfm]

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

استخدم هذا الكود لتغيير حالة الارقام الى الهندية بدل العربية  

ولكن في حالة كان الرقم اكثر من اربع خانات مثل (1000) تظهر الارقام في التقرير (1,000) بهذا الشكل مع العلم اني قمت بمحاولة تغيير الاعدادات لحقل (Record Number) ليكون (1000) بهذا الشكل بدون فواصل ولكن لم استطع 
ملاحظة في حالة الغاء الكود تظهر بشكل سليم ولكن ارقام عربية (1234567890) والمطلوب تظهر ارقام هندية

كود :

Local StringVar str := ToText(CurrentFieldValue );
if IsNumeric(str) then str := ToText(ToNumber(str),0 ); // 0 عدد العلامات العشرية

Local numberVar  i:=0;
for  i:=0  to 9 do
    str:=Replace(str,totext(i,0) , ChrW (i+1632));
str

---

نماذج للترقيم الهندي والعربي

---

المطلوب الغاء الفاصلة من الترقيم الهندي