Browse Source

* replaced fvstring with sw_string in validate.inc

git-svn-id: branches/unicodekvm@48596 -
nickysn 4 years ago
parent
commit
047b435131
1 changed files with 15 additions and 15 deletions
  1. 15 15
      packages/fv/src/validate.inc

+ 15 - 15
packages/fv/src/validate.inc

@@ -134,11 +134,11 @@ TYPE
          Status : Word;                               { Validator status }
          Options: Word;                               { Validator options }
       CONSTRUCTOR Load (Var S: TStream);
-      FUNCTION Valid(CONST S: FVString): Boolean;
-      FUNCTION IsValid (CONST S: FVString): Boolean; Virtual;
-      FUNCTION IsValidInput (Var S: FVString;
+      FUNCTION Valid(CONST S: Sw_String): Boolean;
+      FUNCTION IsValid (CONST S: Sw_String): Boolean; Virtual;
+      FUNCTION IsValidInput (Var S: Sw_String;
         SuppressFill: Boolean): Boolean; Virtual;
-      FUNCTION Transfer (Var S: FVString; Buffer: Pointer;
+      FUNCTION Transfer (Var S: Sw_String; Buffer: Pointer;
         Flag: TVTransfer): Word; Virtual;
       PROCEDURE Error; Virtual;
       PROCEDURE Store (Var S: TStream);
@@ -151,13 +151,13 @@ TYPE
 TYPE
    TPXPictureValidator = OBJECT (TValidator)
          Pic: PString;                                { Picture filename }
-      CONSTRUCTOR Init (Const APic: FVString; AutoFill: Boolean);
+      CONSTRUCTOR Init (Const APic: Sw_String; AutoFill: Boolean);
       CONSTRUCTOR Load (Var S: TStream);
       DESTRUCTOR Done; Virtual;
-      FUNCTION IsValid (Const S: FVString): Boolean; Virtual;
-      FUNCTION IsValidInput (Var S: FVString;
+      FUNCTION IsValid (Const S: Sw_String): Boolean; Virtual;
+      FUNCTION IsValidInput (Var S: Sw_String;
         SuppressFill: Boolean): Boolean; Virtual;
-      FUNCTION Picture (Var Input: FVString;
+      FUNCTION Picture (Var Input: Sw_String;
         AutoFill: Boolean): TPicResult; Virtual;
       PROCEDURE Error; Virtual;
       PROCEDURE Store (Var S: TStream);
@@ -174,8 +174,8 @@ TYPE
          ValidChars: CharSet;                         { Valid char set }
       CONSTRUCTOR Init (AValidChars: CharSet);
       CONSTRUCTOR Load (Var S: TStream);
-      FUNCTION IsValid (CONST S: FVString): Boolean; Virtual;
-      FUNCTION IsValidInput (Var S: FVString;
+      FUNCTION IsValid (CONST S: Sw_String): Boolean; Virtual;
+      FUNCTION IsValidInput (Var S: Sw_String;
         SuppressFill: Boolean): Boolean; Virtual;
       PROCEDURE Error; Virtual;
       PROCEDURE Store (Var S: TStream);
@@ -191,8 +191,8 @@ TYPE
          Max: LongInt;                                { Max valid value }
       CONSTRUCTOR Init(AMin, AMax: LongInt);
       CONSTRUCTOR Load (Var S: TStream);
-      FUNCTION IsValid (Const S: FVString): Boolean; Virtual;
-      FUNCTION Transfer (Var S: FVString; Buffer: Pointer;
+      FUNCTION IsValid (Const S: Sw_String): Boolean; Virtual;
+      FUNCTION Transfer (Var S: Sw_String; Buffer: Pointer;
         Flag: TVTransfer): Word; Virtual;
       PROCEDURE Error; Virtual;
       PROCEDURE Store (Var S: TStream);
@@ -204,8 +204,8 @@ TYPE
 {---------------------------------------------------------------------------}
 TYPE
    TLookupValidator = OBJECT (TValidator)
-      FUNCTION IsValid (Const S: FVString): Boolean;                   Virtual;
-      FUNCTION Lookup (Const S: FVString): Boolean;                    Virtual;
+      FUNCTION IsValid (Const S: Sw_String): Boolean;                   Virtual;
+      FUNCTION Lookup (Const S: Sw_String): Boolean;                    Virtual;
    END;
    PLookupValidator = ^TLookupValidator;
 
@@ -218,7 +218,7 @@ TYPE
       CONSTRUCTOR Init (AStrings: PStringCollection);
       CONSTRUCTOR Load (Var S: TStream);
       DESTRUCTOR Done;                                               Virtual;
-      FUNCTION Lookup (Const S: FVString): Boolean;                    Virtual;
+      FUNCTION Lookup (Const S: Sw_String): Boolean;                    Virtual;
       PROCEDURE Error;                                               Virtual;
       PROCEDURE NewStringList (AStrings: PStringCollection);
       PROCEDURE Store (Var S: TStream);