* Declare RtlString and make it utf16 string for win32.

git-svn-id: branches/unicodertl@12068 -

rtl/inc/systemh.inc

@@ -359,6 +359,15 @@ Type
 {$endif VER2_2}
   PUnicodeString      = ^UnicodeString;
 
+{$ifdef FPC_RTLSTRING_UTF16}
+  RtlString           = UnicodeString;
+  RtlChar             = UnicodeChar;
+{$else}
+  RtlString           = AnsiString;
+  RtlChar             = AnsiChar;
+{$endif FPC_RTLSTRING_UTF16}
+  PRtlChar            = ^RtlChar;
+
   { Needed for fpc_get_output }
   PText               = ^Text;
 

rtl/win32/system.pp

@@ -28,6 +28,8 @@ interface
 
 {$define DISABLE_NO_THREAD_MANAGER}
 
+{$define FPC_RTLSTRING_UTF16}
+
 { include system-independent routine headers }
 {$I systemh.inc}