【转】Delphi 开发跨平台 Android / iOS 程序的多语言

2022/4/19 9:12:41

本文主要是介绍【转】Delphi 开发跨平台 Android / iOS 程序的多语言,对大家解决编程问题具有一定的参考价值,需要的程序猿们随着小编来一起学习吧!

使用 Delphi 的 FireMonkey 框架,开发跨平台的程序,可以做到一个源码,编译成 Windows, Mac OS, Android, iOS,甚至是 Linux 上面运行的程序。

简单说,就是可以开发 Android 和 iOS 的 APP,同时代码不修改也可以运行在 Windows 上和 Mac OS 上面。

如果你发布的 APP 需要给各国用户使用,需要考虑多语言的支持。我之前有博客文章写过如何实现多语言支持:

假期有时间写代码:FireMonkey 之多语言(TLang)

问题简述

数据库的中文内容,在手机系统语言非中文时,显示乱码。此现象出现在 Android 和 iOS 上面。Windows 上面没有此问题。

一些使用多语言框架需要注意的细节

1. 设计期,一个 TLabel 或者其它控件,只要它有 AutoTranslate 属性,将这个属性设置为 True,拿 TLabel 作为例子,在设计期设置好它的 Text 属性为特定的字符串,比如【温度】,然后在语言前述文章里面提到的语言文件里面有【温度=Temperature】这样的翻译内容,则程序运行时,切换了语言,则 TLabel 的 Text 显示的文字内,自动变化为 Temperature 这个翻译后的文字。

2. 运行期:假设运行期,在一个 Button1.OnClick 事件里面,有代码:

Label1.Text := '温度';
则它仍然显示汉字的温度,不会自动变成英文,即便当前的语言设置是英文。

这里有两种办法解决这个问题。

2.1. 办法一:赋值语句,调用翻译函数,将翻译后的字符串赋值给 Label1,代码:

Label1.Text := Translate('温度');
这个办法,前述文章提到过。

2.2. 办法二:触发自动翻译,代码:

Label1.Text := '温度';
TStyleManager.UpdateScenes; //---- 执行这行代码,Label1.Text 会自动翻译。前提是设置 Label1.AutoTranslate 属性为 True;

//---- TStyleManager.UpdateScenes; 这个方法需要 uses Fmx.Styles 单元。

一个更大的问题:数据库内容的多语言显示

在 FireMonkey 框架底下,我们可以使用 SQLite 数据库作为 APP 程序的本地数据库,将其内容显示呈现在界面上。

假设数据库里面有个表,里面有一些设计期就写入的内容,在用户使用 APP 时,这些内容会显示在 APP 界面上。同时我们希望用户使用不同语言的时候,同样的内容,要显示为对应的语言。

数据库的内容要显示到界面,这里可以采用 Delphi 提供的 LiveBindings 方法,将界面上的 ListView 或者 Label 等控件绑定到数据库指定的字段上。

数据库游标滚动后显示的内容

当数据库的游标滚动,在使用 LiveBindings 技术的情况下,Label 显示的内容自动跟随显示当前 DataSet 的游标所在记录的对应字段的内容,这时候,显示的是数据库里面的原始的字段内容字符串,并不是我们希望的当前用户设置的语言对应的文字。这里其实就是相当于运行期在为 Label1.Text 赋值。此时,在数据库游标滚动后,需要增加一行代码:TStyleManager.UpdateScenes; 让多语言框架触发自动翻译,然后用户看到的就是对数据库的内容翻译后的内容。

数据库内容在不同语言的系统里面显示乱码,自动翻译失败

在 FireMonkey 里面,数据库控件,我喜欢使用 FireDAC 那套。

如果字符串字段的类型是 TStringField,里面的内容是中文值,则:

1. 在 Windows 底下,无论系统语言是中文还是英文,都没有问题;

2. 在 Android 和 iOS 底下,系统语言是中文没有问题;系统语言是英文,则显示出来的文字是乱码,当然也就会翻译失败。因为我们的翻译内容是【温度=Temperature】,是乱码,而不是【温度】,使得自动翻译找不到对应的 Key 值,在找不到语言文件里面的对应的 Key 值得情况下,自动翻译将给出没翻译的原始内容,而这个内容是乱码。因此,显示乱码。

解决这个问题:字段类型为 TWideStringField,则上述问题解决。

假设本地数据库采用 SQLite,要怎样做才能让 TFdQuery 这个 DataSet 的字段类型是 TWideStringFied ?

在 SQLite 数据库里面,设计的时候,存储字符串的字段,如果类型是 VarChar 则对应该字段的 Delphi 的 DataSet 里面的字段类型是 TStringField;

如果 SQLite 的字段类型是 NVarChar 字段,则 Delphi 里面对应的字段类型是 TWideStringField;

因此,如果数据库的内容想要在多种系统语言下面正确显示,简单说,要在英文为系统语言的手机上,正确显示数据库内容而不是显示乱码,使用 SQLite 作为手机端本地数据库来使用的话,SQLite 的字段类型应该是 NVarChar 而不是 VarChar。

做到上述几点,数据库内容是中文,也能正确将中文显示在英文系统语言的手机上。

但是,如果数据库内容是中文,在英文系统语言的手机上想要显示为翻译后的英文,那么,就需要在运行期,在数据库滚动后(DataSet.Next 或类似的操作),调用一次 TStyleManager.UpdateScenes;

当然,重复一下:想要自动翻译,前提是使用 LoadLangFromStrings 函数事先加载对应的翻译词条。

总结:

1. 使用 LoadLangFromStrings 加载对应语言的 Key=Value 的翻译词条;

2. SQLite 的字段使用 NVarChar 而不是 VarChar 类型,对应的 Delphi 的 DataSet 里面的字段类型是 TWideStringField 而不是 TStringField;

3. 运行期改变的界面元素的内容后,比如使用 LiveBindings 绑定 TLabel.Text 到数据库的 DataSet 的某个字段,当 DataSet 滚动后,调用一次 TStyleManager.UpdateScenes; 触发自动翻译。

 

原文地址



这篇关于【转】Delphi 开发跨平台 Android / iOS 程序的多语言的文章就介绍到这儿,希望我们推荐的文章对大家有所帮助,也希望大家多多支持为之网!


扫一扫关注最新编程教程