[صالح عبدالله]

السلام عليكم ورحمة الله وبركاته 
أين أجد خطوط لتعريب الأرقام في الكريستال ريبورت غير هذه الخطوط sc_OUHOD      أو خط  amien 01  أريد خطوط تكون تستخدم في الخطابات وتكون أفضل من هذه الخطوط ( أريد استخدامها لمربعات النص وليس للحقول المرتبطة بقاعدة البيانات  )

[Kamil]

جرب هذه المجموعة من الحطوط  

Fonts

[صالح عبدالله]

السلام عليكم ورحمة الله وبركاته 
للأسف أستاذ كامل جربت تظهر الأرقام باللغة الانجليزية 
شاكر لك إهتمامك

[aljzazy]

كود :

Imports System.Globalization
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       ' Create an instance of your Crystal Report
       Dim report As New ReportDocument()
       report.Load("Path_to_your_report_file.rpt")

       ' Set the culture to Arabic
       Dim arabicCulture As CultureInfo = CultureInfo.CreateSpecificCulture("ar")
       System.Threading.Thread.CurrentThread.CurrentCulture = arabicCulture

       ' Set the locale ID for Crystal Report
       report.SetDatabaseLogon("username", "password")
       Dim tables As Tables = report.Database.Tables
       Dim connectionInfo As New ConnectionInfo()

       ' Set the locale for each table in the report
       For Each table As Table In tables
           connectionInfo = table.LogOnInfo
           connectionInfo.LocaleID = CType(arabicCulture.LCID, Integer)
           table.ApplyLogOnInfo(connectionInfo)
       Next

       ' Set the Crystal Report Viewer's report source to the modified report
       CrystalReportViewer1.ReportSource = report
   End Sub
End Class

[صالح عبدالله]

الأستاذ الجزازي شكراً لإهتمامك سوف اجرب الكود واعطيك النتيجة