سوال در مورد تغییر Regional Setting

[Kamyar.Kimiyabeigi]

من به کمک کد زیر تغییراتم رو در Regional Setting میدم و همه کاملا" درست تغییر میکنن ولی ویندوز متوجه تغییر فرمت ساعت نمیشه؟؟؟؟؟


Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('Control Panel\International', False) then
begin
Reg.WriteString('s1159', 'AM');
Reg.WriteString('s2359', 'PM');
Reg.WriteString('sLongDate', 'yyyy/MM/dd');
Reg.WriteString('sShortDate', 'yyyy/MM/dd');
Reg.WriteString('sTimeFormat', 'h:mm:ss tt');
end;
finally
Reg.CloseKey;
Reg.Free;
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);
end;

میشه راهنمایی کنین

[Kamyar.Kimiyabeigi]

مشکلم حل شد اگر Source اش بدرد کسی میخوره بگین تا براتون بزارم

[saeed_d]

مشکلم حل شد اگر Source اش بدرد کسی میخوره بگین تا براتون بزارم
سلام
کار خیر و پرسش؟
اگه لطف کنید ممنون میشم

[Mahdi_S_T]

چی شد منتظریم ! اگه تنظیمات زبان فارسی رو هم اضافه کنی بعلاوه نوع اعداد خیلی عالی میشه

[Kamyar.Kimiyabeigi]

SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_STIMEFORMAT, 'h:mm:ss tt');
SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_S1159, 'AM');
SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_S2359, 'PM');
SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SLONGDATE, 'yyyy/MM/dd');
SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SSHORTDATE, 'yyyy/MM/dd');
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);

در رجیستری هم مسیر زیره :
HKEY_CURRENT_USER\Control Panel\International