anchor.diff:  
   function KMGetDiagVertex(const P1,P2: TKMPoint): TKMPoint;
   begin
  -  //Returns the position of the vertex inbetween the two diagonal points (points must be diagonal)
  -  Result.X := max(P1.X,P2.X);
  -  Result.Y := max(P1.Y,P2.Y);
  +  // Returns the position of the vertex inbetween the two diagonal points (points must be diagonal)
  +  Result.X := Max(P1.X,P2.X);
  +  Result.Y := Max(P1.Y,P2.Y);
   end;
   
   
  
positive.code:   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;
  
  
negative.code:     dirSE: Result := KMRectGrowBottomRight(aRect, aInset);
      dirSW: Result := KMRectGrowBottomLeft(aRect, aInset);
      dirNW: Result := KMRectGrowTopLeft(aRect, aInset);
    else
      Result := aRect; //not implemented yet
    end;
  end;
  
  