anchor.diff:        class function StringToVariant(const aValue : String): Variant;
         class function VariantToString(const aValue: Variant; const aShowTime: boolean): String;
   
  -      function AsString (const aShowTime : boolean) : String;
  +      function AsString (const aShowTime : boolean) : String; overload;
  +      function AsString : String; override; overload;
   
         property Value : TDateTime read GetValue write SetValue;
     end;
  
positive.code:     class function StringToVariant(const aValue: String): Variant;
      class function VariantToString(const aValue: Variant): String;
  
      function AsString : String;
  
      property Value : String read GetValue write SetValue;
    end;
  
    { TNullableUnicodeString }
  {
    TNullableUnicodeString = class (TAbstractNullable)
      private
        FValue : UnicodeString;
        function GetValue: UnicodeString;
        procedure SetValue(AValue: UnicodeString);
      public
        constructor Create(); override; overload;
        constructor Create(aValue: UnicodeString); overload;
  
        procedure Assign(aSource : TNullableUnicodeString); overload;
        procedure Assign(aSourceField : TField); override; overload;
        procedure Assign (const aValue : String; const aBlankStringMeansNull : boolean); override; overload;
        function AsVariant: Variant; override;
  
        property Value : UnicodeString read GetValue write SetValue;
    end;}
  
    { TNullableAnsiString }
  
  {  TNullableAnsiString = class (TAbstractNullable)
      private
        FValue : AnsiString;
        function GetValue: AnsiString;
        procedure SetValue(AValue: AnsiString);
      public
        constructor Create(); override; overload;
        constructor Create(aValue: AnsiString); overload;
  
        procedure Assign(aSource : TNullableAnsiString); overload;
        procedure Assign(aSourceField : TField); override; overload;
        procedure Assign (const aValue : String; const aBlankStringMeansNull : boolean); override; overload;
        function AsVariant: Variant; override;
  
        property Value : AnsiString read GetValue write SetValue;
    end;
   }
  
    { TNullableDateTime }
  
  
negative.code: 
      function CheckIfDifferentAndAssign(const aValue : Variant) : boolean; override;
  
      function AsString : String; override;
      function AsFloat : Double;
      function AsFormattedString (aFormat: String): String;
  
  