Quellcode durchsuchen

* AnsiChar -> Char for format settings

Michael VAN CANNEYT vor 2 Jahren
Ursprung
Commit
0dc48b6fc9
1 geänderte Dateien mit 6 neuen und 5 gelöschten Zeilen
  1. 6 5
      rtl/objpas/sysutils/sysinth.inc

+ 6 - 5
rtl/objpas/sysutils/sysinth.inc

@@ -1,3 +1,4 @@
+{%MainUnit sysutils.pp}
 {
     This file is part of the Free Pascal run time library.
     Copyright (c) 1999-2000 by the Free Pascal development team
@@ -33,12 +34,12 @@ type
   TFormatSettings = record
     CurrencyFormat: Byte;
     NegCurrFormat: Byte;
-    ThousandSeparator: AnsiChar;
-    DecimalSeparator: AnsiChar;
+    ThousandSeparator: Char;
+    DecimalSeparator: Char;
     CurrencyDecimals: Byte;
-    DateSeparator: AnsiChar;
-    TimeSeparator: AnsiChar;
-    ListSeparator: AnsiChar;
+    DateSeparator: Char;
+    TimeSeparator: Char;
+    ListSeparator: Char;
     CurrencyString: string;
     ShortDateFormat: string;
     LongDateFormat: string;