* fix for #33817, also p* marshalledstring for Delphi compat.

git-svn-id: trunk@39165 -

rtl/inc/systemh.inc

@@ -592,6 +592,9 @@ Type
   PUnicodeChar        = ^UnicodeChar;
   PUnicodeString      = ^UnicodeString;
 
+  PMarshaledString    = ^PWideChar;
+  PMarshaledAString   = ^PAnsiChar;
+
   MarshaledString     = PWideChar;
   MarshaledAString    = PAnsiChar;