TLocale

type TLocale = record

  loc_LocaleName: PChar;

  loc_LanguageName: PChar;

  loc_PrefLanguages: array [0..9] of PChar;

  loc_Flags: LongWord;

  loc_CodeSet: LongWord;

  loc_CountryCode: LongWord;

  loc_TelephoneCode: LongWord;

  loc_GMTOffset: LongWord;

  loc_MeasuringSystem: Byte;

  loc_CalendarType: Byte;

  loc_Reserved0: array [0..1] of Byte;

  loc_DateTimeFormat: PChar;

  loc_DateFormat: PChar;

  loc_TimeFormat: PChar;

  loc_ShortDateTimeFormat: PChar;

  loc_ShortDateFormat: PChar;

  loc_ShortTimeFormat: PChar;

  loc_DecimalPoint: PChar;

  loc_GroupSeparator: PChar;

  loc_FracGroupSeparator: PChar;

  loc_Grouping: PByte;

  loc_FracGrouping: PByte;

  loc_MonDecimalPoint: PChar;

  loc_MonGroupSeparator: PChar;

  loc_MonFracGroupSeparator: PChar;

  loc_MonGrouping: PByte;

  loc_MonFracGrouping: PByte;

  loc_MonFracDigits: Byte;

  loc_MonIntFracDigits: Byte;

  loc_Reserved1: array [0..1] of Byte;

  loc_MonCS: PChar;

  loc_MonSmallCS: PChar;

  loc_MonIntCS: PChar;

  loc_MonPositiveSign: PChar;

  loc_MonPositiveSpaceSep: Byte;

  loc_MonPositiveSignPos: Byte;

  loc_MonPositiveCSPos: Byte;

  loc_Reserved2: Byte;

  loc_MonNegativeSign: PChar;

  loc_MonNegativeSpaceSep: PChar;

  loc_MonNegativeSignPos: PChar;

  loc_MonNegativeCSPos: PChar;

  loc_Reserved3: Byte;

end;