delphi - 如何在不特定于平台的情况下使用 TFormatSettings.Create？

Question

我在 Delphi XE 中有以下内容:

fSettings := TFormatSettings.Create(LOCALE_USER_DEFAULT);

但我总是在编译时收到警告:

W1002 Symbol 'Create' is specific to a platform

正确的方法是什么，这样我就不会收到警告？

Answer 1

你有两个选择

1) 使用重载版本，该版本使用字符串而不是 TLocaleID

class function Create(const LocaleName: string): TFormatSettings; overload; static;

2)本地禁用警告

{$WARN SYMBOL_PLATFORM OFF}
    fSettings := TFormatSettings.Create(LOCALE_USER_DEFAULT);
{$WARN SYMBOL_PLATFORM ON}