anchor.diff:        lookupFrm.Free;
       end;
     end;
  +
  +  curLine.EditorExecuted:= Result;
   end;
   
   function TmEditingPanel.OnValueListEditorClearValue(const aCol, aRow: integer): boolean;
  
positive.code:       begin
          if not IsNumeric(NewValue, false) then
          begin
            NewValue := OldValue;
            TmToast.ShowText(SErrorNotANumber);
          end
          else
  
negative.code:         end
          else
          begin
            NewValue := RealOldValue;
            TmToast.ShowText(SErrorNotADate);
          end;
        end
  