anchor.diff:      function GetValueFromMemo (const aName : string; const aTrimValue : boolean) : string;
       procedure CheckDate (const aOldStringValue : string; var aNewStringValue : string; var aActualValue : variant);
       procedure CheckTime (const aOldStringValue : string; var aNewStringValue : string; var aActualValue : variant);
  +    procedure CheckDateTime (const aOldStringValue : string; var aNewStringValue : string; var aActualValue : variant);
       procedure CheckInteger (const aOldStringValue : string; var aNewStringValue : string; var aActualValue : variant);
       procedure CheckYear(const aOldStringValue : string; const aDataType: TmEditorLineDataType; const aDistanceInMonths : integer; var aNewStringValue : string; var aActualValue : variant);
       procedure CheckMonth(const aOldStringValue : string; const aDataType: TmEditorLineDataType; var aNewStringValue : string; var aActualValue : variant);
  
positive.code:   end
    else
      aActualValue:= null;
  end;
  
  procedure TmEditingPanel.CheckInteger(const aOldStringValue: string; var aNewStringValue: string; var aActualValue: variant);
  
negative.code:     end
      else if (curLine.Configuration.DataType = dtDate) and (curLine.Configuration.ChangedValueDestination is TNullableDateTime) then
        str := (curLine.Configuration.ChangedValueDestination as TNullableDateTime).AsString(false)
      else if (curLine.Configuration.DataType = dtDateTime) and (curLine.Configuration.ChangedValueDestination is TNullableDateTime) then
        str := (curLine.Configuration.ChangedValueDestination as TNullableDateTime).AsString(true)
      else if (curLine.Configuration.DataType = dtColor) then
        str := (curLine.Configuration.ChangedValueDestination as TNullableColor).AsString
      else if (curLine.Configuration.DataType = dtTime) and (curLine.Configuration.ChangedValueDestination is TNullableTime) then
  