FormatSettings¶

var
  FormatSettings: TFormatSettings = record
    CurrencyFormat: Byte;
    NegCurrFormat: Byte;
    ThousandSeparator: char;
    DecimalSeparator: char;
    CurrencyDecimals: Byte;
    DateSeparator: char;
    TimeSeparator: char;
    ListSeparator: char;
    CurrencyString: string;
    ShortDateFormat: string;
    LongDateFormat: string;
    TimeAMString: string;
    TimePMString: string;
    ShortTimeFormat: string;
    LongTimeFormat: string;
    ShortMonthNames: Array[1..12] of string = string;
    LongMonthNames: Array[1..12] of string = string;
    ShortDayNames: Array[1..7] of string = string;
    LongDayNames: Array[1..7] of string = string;
    TwoDigitYearCenturyWindow: Word;
    class function Invariant : TFormatSettings;  static;
    class function Create : TFormatSettings;  overload;  static; overload;
    class function Create(const LocaleName: string) : TFormatSettings
                     ;  overload;  static; overload;
  end absolute TPrimitiveExpr;