我有一个程序想把所有的TITLE和Label的Caption等窗体上的信息都放到资源文件里面但是要求是多种语言的比如
中文 English
101 管理 manage如果是这样的话,我的程序怎么样才能识别这个是英文或是中文的那;
还有就是我想过做二个资源文件一个是中文的一个是英文的但是程序时选择的是中文的还是英文的那?不知道那位大哥清楚请告诉我谢谢先
中文 English
101 管理 manage如果是这样的话,我的程序怎么样才能识别这个是英文或是中文的那;
还有就是我想过做二个资源文件一个是中文的一个是英文的但是程序时选择的是中文的还是英文的那?不知道那位大哥清楚请告诉我谢谢先
中文 English
101 管理 manage
你象这样他怎么能识别出来什么时候用中文什么时候用英文,我真的不清楚,请不要笑我:)
Declare Function GetSystemDefaultLangID Lib "kernel32" Alias "GetSystemDefaultLangID" () As Integer
说明
取得系统的默认语言ID
返回值
Integer,系统的默认语言ID 'Identifier Language
'0 x0404 Chinese (Taiwan Region)
'0 x0804 Chinese(PRC)
'0 x0c04 Chinese (Hong Kong SAR, PRC)
'0 x1004 Chinese(Singapore)
'0 x0409 English (United States)
'0 x0809 English (United Kingdom)
'0 x0c09 English(Australian)
'0 x1009 English(Canadian)
'0 x1409 English(New Zealand)
'0 x1809 English(Ireland)
'0 x1c09 English (South Africa)
'0 x2009 English(Jamaica)
'0 x2409 English(Caribbean)
'0 x2809 English(Belize)
'0 x2c09 English(Trinidad)
'0 x0411 Japanese Dim i As Long
i = GetSystemDefaultLangID()
Select Case i
Case &H804
GetSysLangType = ChinesePrc
Case &H409
GetSysLangType = EnglishUA
Case &H411
GetSysLangType = Japan
End Select比如
中文字符串 101 "管理"
英文字符串 201 "manage"程序里面判断目前语言,选择相应资源
102 系统 system 日文我是想在一个资源文件的ID下存放多种语言然后在安装的时候有几个选项,让用户选择安装那种语言,如果用户选择的英文则调用101代码下的英文,如果安装时选择的是中文则调用101下面的中文,这样怎么实现?
然后,界面的文字依照下例处理:
label1.caption=LoadResString(101)
在(简体)中文系统,label1就会显示"管理",英文系统就会显示"manage",日文,当然要在字串表中先输入日文字了。