我需要获取Windows返回的语言环境ID:

GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_ILANGUAGE, PChar(locale), 256)

适用于iOS和Android。我需要用于SQL Server排序规则信息(LCID)。

最佳答案

您可以使用 TPlatformServices IFMXLocaleService 界面访问设备区域设置服务。

uses
  FMX.Platform;
...
...
var
  LService: IFMXLocaleService;
  LangID  : string;
begin
  if TPlatformServices.Current.SupportsPlatformService(IFMXLocaleService, IInterface(LService)) then
    LangID := LService.GetCurrentLangID;
end;

09-30 23:03