关于多语言：如何获取当前系统语言
2018-03-16 10:38
369 查看
uses FMX.Platform;
function TForm2.GetCurrentLan: string;
var
LocServ: IFMXLocaleService;
begin
//读取当前语言，测试通过。
if TPlatformServices.Current.SupportsPlatformService(IFMXLocaleService, IInterface(LocServ)) then
Result := LocServ.GetCurrentLangID;
end;
以上代码，Windows 和 Android 底下测试通过。iOS 想来也不会有问题。
参考： Language on iOS/Android
function TForm2.GetCurrentLan: string;
var
LocServ: IFMXLocaleService;
begin
//读取当前语言，测试通过。
if TPlatformServices.Current.SupportsPlatformService(IFMXLocaleService, IInterface(LocServ)) then
Result := LocServ.GetCurrentLangID;
end;
以上代码，Windows 和 Android 底下测试通过。iOS 想来也不会有问题。
参考： Language on iOS/Android
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- android 如何获取当前系统所使用的语言
- Struts全球化关于获取系统可用语言
- iOS获取系统当前语言
- Android 获取当前系统语言及地区,并更改语言
- Android 获取当前系统语言及地区,并更改语言
- iOS 获取系统语言以及当前系…
- Oracle中如何获取系统当前时间
- Android 获取当前系统语言及地区
- ios关于如何获取手机当前的ip
- 关于在批处理中如何获取当前目录
- Oracle中如何获取系统当前时间
- Android 获取当前系统的语言环境及网络连接类型（有源码）
- Android--获取当前系统的语言环境
- 信息管理系统如何获取当前日期时间
- iOS获取系统当前语言
- Delphi FireMonkey APP 如何获得当前系统语言设置
- VC如何获取并显示当前系统时间
- Android编程实现获取当前系统语言及地区并更改语言的方法
- MySql如何获取系统当前时间
- Oracle 在SQL语句中如何获取系统当前时间并进行操作