delphi - Delphi XE2 - FireMonkey でシステム ロケールを返す

Question

Win32 と MacOSX で実行している Delphi XE2 FireMonkey アプリがあります。これが Win32 か MacOSX かに関係なく、アプリが実行されている現在のシステム ロケール (en_GB など) を返したいと考えています。これを提供するFireMonkeyクラス/プロパティはありますか?おそらくTOSVersionに似ていますか? またはそれを取得する他の方法はありますか？

Answer 1

TPlatform.GetCurrentLangIDプロパティを試す

このサンプルを確認してください

uses
  FMX.Platform;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage(Platform.GetCurrentLangID);
end;