anchor.diff:  unit gui_basegrid;
   
   {$mode objfpc}{$H+}
  -
  -{
  -  TODO:
  -    * Selecting the last fully visible row, scrolls the grid. Selection
  -      is correct, but because of the scroll it is confusing.
  -}
   
   {.$Define DEBUG}
   
  
positive.code:   else
    begin
      if (FFirstRow + VisibleLines - 1) < FFocusRow then
        FFirstRow := FFocusRow - VisibleLines + 1;
    end;  { if/else }
  
    if FFocusCol < FFirstCol then
  
negative.code: {
      fpGUI  -  Free Pascal GUI Library
  
      Copyright (C) 2006 - 2008 See the file AUTHORS.txt, included in this
      distribution, for details of the copyright.
  
      See the file COPYING.modifiedLGPL, included in this distribution,
  