|
@@ -142,6 +142,16 @@ TYPE
|
|
Sw_Integer = LongInt; { Long integer now }
|
|
Sw_Integer = LongInt; { Long integer now }
|
|
{$ENDIF}
|
|
{$ENDIF}
|
|
|
|
|
|
|
|
+{---------------------------------------------------------------------------}
|
|
|
|
+{ SHORT/ANSI/UNICODE SWITCHED STRING TYPE }
|
|
|
|
+{---------------------------------------------------------------------------}
|
|
|
|
+TYPE
|
|
|
|
+{$IFDEF FV_UNICODE}
|
|
|
|
+ Sw_String = UnicodeString;
|
|
|
|
+{$ELSE FV_UNICODE}
|
|
|
|
+ Sw_String = ShortString;
|
|
|
|
+{$ENDIF FV_UNICODE}
|
|
|
|
+
|
|
{---------------------------------------------------------------------------}
|
|
{---------------------------------------------------------------------------}
|
|
{ GENERAL ARRAYS }
|
|
{ GENERAL ARRAYS }
|
|
{---------------------------------------------------------------------------}
|
|
{---------------------------------------------------------------------------}
|