anchor.diff:    else
       Result := ColorToString(Self.Value);
   end;
  +{$ENDIF}
  +{$ENDIF}
   
   { TNullableInteger }
   
  
positive.code:     property Value : Integer read GetValue write SetValue;
    end;
  
    { TNullableColor }
  
    TNullableColor = class(TAbstractNullable)
  
negative.code: interface
  
  uses
    db,
    {$IFDEF FPC}
    {$IFDEF LCL}
    Graphics,
    {$ENDIF}
    {$ENDIF}
    variants, Classes,
    mUtility, mMathUtility, mFloatsManagement;
  
  type
  
  
    { TAbstractNullable }
    TAbstractNullable = class abstract
    strict private
      FTagChanged: Boolean;
  