anchor.diff:    function TypeToString(const P: TKMPointDir): string; overload;
     function TypeToString(const P: TKMPointF): string; overload;
     function TypeToString(const T: TKMDirection): string; overload;
  -  function TypeToString(const aRect: TKMRect): string; overload;
   
     function StringToType(const Str: String): TKMPoint; overload;
   
  
positive.code:     dirSE: Result := KMRectGrowBottomRight(aRect, aInset);
      dirSW: Result := KMRectGrowBottomLeft(aRect, aInset);
      dirNW: Result := KMRectGrowTopLeft(aRect, aInset);
      dirN, dirE, dirS, dirW: Result := aRect; //not implemented yet
    end;
  end;
  
  
negative.code: end;
  
  
  function KMRange(aMin, aMax: Integer): TKMRangeInt;
  begin
    Result.Min := Min(aMin, aMax);
  