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