27-01-24, 08:08 PM
طريقة لجعل البرنامج لا يعمل على الاجهزة التي لاتدعم اللغة العربية
يعني لو الجهاز لا يدعم اللغة العربية البرنامج لا يعمل
يعني لو الجهاز لا يدعم اللغة العربية البرنامج لا يعمل
PHP كود :
Imports System.Globalization
Imports System.Windows.Forms
Module Program
Sub Main()
If IsArabicLanguageSupported() Then
Application.EnableVisualStyles()
Application.SetCompatibleTextRenderingDefault(False)
Application.Run(New YourMainForm())
Else
MessageBox.Show("اللغة العربية غير مدعومة على هذا النظام.", "تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Warning)
End If
End Sub
Function IsArabicLanguageSupported() As Boolean
' احصل على اللغة الافتراضية لنظام التشغيل
Dim defaultCulture As CultureInfo = CultureInfo.InstalledUICulture
' تحقق إذا كانت اللغة العربية مدعومة
Return defaultCulture.Name.StartsWith("ar", StringComparison.OrdinalIgnoreCase)
End Function
End Module