anchor.diff:  begin
     inherited Create;
   
  -  fToolBarWidth := aToolBarWidth;
  +  fToolbarWidth := aToolBarWidth;
   
     fMapX := 1; //Avoid division by 0
     fMapY := 1; //Avoid division by 0
  
positive.code: //Same as above function but with some values changed to suit minimap
  function TKMViewport.GetMinimapClip: TKMRect;
  begin
    Result.Left   := Math.max(round(fPosition.X-(fViewportClip.X/2-fViewRect.Left+fToolBarWidth)/CELL_SIZE_PX/fZoom)+1, 1);
    Result.Right  := Math.min(round(fPosition.X+(fViewportClip.X/2+fViewRect.Left-fToolBarWidth)/CELL_SIZE_PX/fZoom)+1, fMapX);
    Result.Top    := Math.max(round(fPosition.Y-fViewportClip.Y/2/CELL_SIZE_PX/fZoom)+2, 1);
    Result.Bottom := Math.min(round(fPosition.Y+fViewportClip.Y/2/CELL_SIZE_PX/fZoom), fMapY);
  end;
  
  
  procedure TKMViewport.ReleaseScrollKeys;
  begin
    ScrollKeyLeft  := false;
    ScrollKeyRight := false;
    ScrollKeyUp    := false;
    ScrollKeyDown  := false;
    ZoomKeyIn      := false;
    ZoomKeyOut     := false;
  end;
  
  
  
negative.code: 
  function TKMViewport.MapToScreen(const aMapLoc: TKMPointF): TKMPoint;
  begin
    Result.X := Round((aMapLoc.X - fPosition.X) * ZoomedCellSizePX + fViewRect.Right / 2 + ToolbarWidth / 2);
    Result.Y := Round((aMapLoc.Y - fPosition.Y) * ZoomedCellSizePX + fViewRect.Bottom / 2);
  end;
  
  
  