RO 1481 don't build on FPC arm

function RO_GetFormatSettings: TFormatSettings;
begin
  {$WARNINGS OFF}
  {$IFDEF DELPHIXE3UP}
  Result := TFormatSettings.Create;
  {$ELSE}
  GetLocaleFormatSettings({$IFDEF MACOS}CFLocaleCopyCurrent{$ELSE}$0409{$ENDIF}, Result);
  {$ENDIF}
  {$WARNINGS ON}
end;

uROSystem.pas(319,3) Error: Identifier not found “GetLocaleFormatSettings”

Hi,

use

function RO_GetFormatSettings: TFormatSettings;
begin
  {$WARNINGS OFF}
  {$IFDEF DELPHIXE3UP}
  Result := TFormatSettings.Create;
  {$ELSE}
  {$IFDEF DELPHI_or_MSWINDOWS}
  GetLocaleFormatSettings({$IFDEF MACOS}CFLocaleCopyCurrent{$ELSE}$0409{$ENDIF}, Result);
  {$ENDIF}
  {$ENDIF}
  {$WARNINGS ON}
end;

Thanks, logged as bugs://84546

bugs://84546 got closed with status fixed.

Can you please share the changes?

already:

1 Like