如何知系統是簡/英/繁體的,而加入不同的菜單? 如題 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var pLCData: array [0..255] of Char; I: Integer;begin ZeroMemory(@pLCData, SizeOf(plCData)); I := Windows.GetLocaleInfo(LOCALE_SYSTEM_DEFAULT, LOCALE_SLANGUAGE, pLCData, SizeOf(pLCData)); ShowMessage(strpas(pLCData));end; 不过最好是使用GetSystemDefaultLangID得到的结果是WORD值,高字节表示语系,比如中文就是$08,低字节就是子语言,比如简体中文$04所以简体中文就是$0804 不好意思,写反了,应该是低字节表示主语系,高字节表示子语言常用的有:$0804 中文(中国)$0404 中文(台湾)$0411 日本语$0412 朝鲜语$0409 英语(美国)通常系统当中分两个部分设置一个是UserDefault一个是SystemDefault,相对Win2k以上系统而言,改变UserDefault只会影响资源管理器及桌面等的设置,不会影响到用户应用程序(最新Windows系统除外),只有SystemDefault才影响除资源管理器及桌面等以外的用户应用程序. Delphi 怎么调用这个存储过程? 要执行以后显示结果. 如何關閉在寫代碼時 鼠標放到某個參數上時的類似hint的提示? 使媒体播放器窗口变灰(非激活状态) activex的property的问题。高手请进 软件做完了,有关软件的加密问题? 请教怎么实现用一个图片画整个窗体?? 大家快来帮忙呀 沈阳的Delphi程序员工资大概多少啊? 窗体缩小问题 领导程序员密技 写文本文件的问题 没分提问了,哪位大哥给捐赠点.感谢
pLCData: array [0..255] of Char;
I: Integer;
begin
ZeroMemory(@pLCData, SizeOf(plCData));
I := Windows.GetLocaleInfo(LOCALE_SYSTEM_DEFAULT,
LOCALE_SLANGUAGE, pLCData, SizeOf(pLCData));
ShowMessage(strpas(pLCData));
end;
GetSystemDefaultLangID
得到的结果是WORD值,高字节表示语系,比如中文就是$08,低字节就是子语言,比如简体中文$04
所以简体中文就是$0804
常用的有:
$0804 中文(中国)
$0404 中文(台湾)
$0411 日本语
$0412 朝鲜语
$0409 英语(美国)通常系统当中分两个部分设置一个是UserDefault一个是SystemDefault,相对Win2k以上系统而言,改变UserDefault只会影响资源管理器及桌面等的设置,不会影响到用户应用程序(最新Windows系统除外),只有SystemDefault才影响除资源管理器及桌面等以外的用户应用程序.