anchor.diff:    else
       Result := ColorToString(Self.Value);
   end;
  -{$ENDIF}
   {$ENDIF}
   
   { TNullableInteger }
  
positive.code:     property Value : Integer read GetValue write SetValue;
    end;
  
    {$IFDEF FPC}
    {$IFDEF LCL}
    { TNullableColor }
  
    TNullableColor = class(TAbstractNullable)
  
negative.code: 
      property Value : TColor read GetValue write SetValue;
    end;
    {$ENDIF}
  
    { TNullableValue }
  