چک کردن تنظیمات فارسی در زمان اجرا

[v_shalchian]

سلام
می خواستم بدانم راهی وجود دارد که هنگام شروع برنامه تشخیص دهیم که کاربر تنظیمات فارسی ویندوز را انجام داده یا نه ؟
یعنی در Regional and language options در سه قسمت مربوطه تنظیمات را انجام داده باشد.

[مهدی کرامتی]

این طوری میتونید چک کنید:

  

if SysLocale.MiddleEast = True then

	ShowMessage('این سیستم دارای امکانات فارسی نصب شده است')

else

   ShowMessage('امکانات فارسی بر روی این ویندوز نصب نشده است');

[v_shalchian]

کد شما تقریبا درست است ولی وقتی که در Regional and Language options در برگه Advanced در قسمت
Language for non-Unicode Programs فارسی انتخاب نشده باشد ،این کد اعلام می کند که فارسی نصب شده در حالی که هنوز هم همه جا فارسی مشاهده نمی شود.