delphi 多语言问题 ( 积分: 100 )

我使用了reinit单元。
ENGLISH = (SUBLANG_ENGLISH_US shl 10) or LANG_ENGLISH;
CHINESE = (SUBLANG_CHINESE_SIMPLIFIED shl 10) or LANG_CHINESE;
procedure TForm1.Button3Click(Sender: TObject);
begin
if Trim(ComboBox1.Text)='english' then
if LoadNewResourceModule(ENGLISH) <> 0 then
ReinitializeForms;
if trim(ComboBox1.Text)='china' then
if LoadNewResourceModule(CHINESE) <> 0 then
ReinitializeForms;
但是，现在界面资源没有变化。不知那里出错了，请大侠们指点一下，

DELPHI的demos目录有多语言例子,看看它是怎样切换的....

学习学习...

谢了,解决了

可以通过存储的办法。如：INI、XML、数据库、注册表等。
也可以在DELPHI里设置环境再打包安装即可。