تقييم الموضوع :
  • 1 أصوات - بمعدل 1
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تحويل الارقام وعمل المسلسل ؟
#11
(12-01-14, 03:13 PM)العزابي كتب : بسيط جدا جدا

حمل من المرفقات الخط التالي وضعه في مجلد خطوط الجهاز

في التقرير اختر نوع الخط للارقام الخط الموجود لدينا SC_OUHOD_1

وبس

تحياتي


جزاااااااااااك الله خيرا يامبدعنا بارك الله فيك عزيزي
الرد }}}
تم الشكر بواسطة:
#12
ما راح تنحل بهذي الطريقة مع اول تشغيل في اي جهاز عميل راح تلاقي نفس المشكله Blush
الرد }}}
تم الشكر بواسطة:
#13
حل مشكلة الارقام العربي بوضع كود في الحقل المراد تحويله في format editor-->Display string ويتم كتابة هذا الكود
// number field
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
totext(CurrentFieldValue,0)
,'0' , ChrW (1632)
),'1' , ChrW (1633)
),'2' , ChrW (1634)
),'3' , ChrW (1635)
),'4' , ChrW (1636)
),'5' , ChrW (1637)
),'6' , ChrW (1638)
),'7' , ChrW (1639)
),'8' , ChrW (1640)
),'9' , ChrW (1641)
)

// string field
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
Replace(
CurrentFieldValue
,'0' , ChrW (1632)
),'1' , ChrW (1633)
),'2' , ChrW (1634)
),'3' , ChrW (1635)
),'4' , ChrW (1636)
),'5' , ChrW (1637)
),'6' , ChrW (1638)
),'7' , ChrW (1639)
),'8' , ChrW (1640)
),'9' , ChrW (1641)
)or
//string
Local StringVar str :=CurrentFieldValue;
Local numberVar i:=0;
for i:=0 to 9 do
str:=Replace(str,totext(i,0) , ChrW (i+1632));
str

//number
Local StringVar str :=totext(CurrentFieldValue,0);
Local numberVar i:=0;
for i:=0 to 9 do
str:=Replace(str,totext(i,0) , ChrW (i+1632));
strارقام عربي ولا يتم تغير نوع الحقل

هذا هو الحل
الرد }}}
تم الشكر بواسطة:
#14
(23-01-14, 09:23 AM)myalsailamy كتب : ما راح تنحل بهذي الطريقة مع اول تشغيل في اي جهاز عميل راح تلاقي نفس المشكله Blush

صحيح كلامك ولكن هناك طريقة عند تثبيت البرنامج جعل الخط ينسخ تلقائي إلى مجلد

الخطوط .

تحياتي
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: