1、在form放置tlang组件。

2、双击lang1组件。扫描已有组件。

3、添加语言种类。


4、根据选择语言,输入显示内容。

5、添加字串变量。


6、代码。
procedure TForm1.Button1Click(Sender: TObject);
begin
self.Lang1.Lang:='cn';
ShowMessage(lang1.LangStr['cn'].Values['message'])
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
self.Lang1.Lang:='en';
ShowMessage(lang1.LangStr['en'].Values['message'])
end;
5、结果。


参考:http://docwiki.embarcadero.com/CodeExamples/Rio/en/FMXTLang_(Delphi)
本文详细介绍了在Delphi中使用FMX TLang组件实现多语言切换的方法,包括组件放置、语言种类添加、字串变量设置及代码实现过程。

被折叠的 条评论
为什么被折叠?



