Explorar o código

+ introduced type Sw_PString

git-svn-id: branches/unicodekvm@48605 -
nickysn %!s(int64=4) %!d(string=hai) anos
pai
achega
5e9ba29d89
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  1. 2 0
      packages/fv/src/fvcommon.inc

+ 2 - 0
packages/fv/src/fvcommon.inc

@@ -148,8 +148,10 @@ TYPE
 TYPE
 {$IFDEF FV_UNICODE}
    Sw_String = UnicodeString;
+   Sw_PString = UnicodeString;
 {$ELSE FV_UNICODE}
    Sw_String = ShortString;
+   Sw_PString = PShortString;
 {$ENDIF FV_UNICODE}
 
 {---------------------------------------------------------------------------}