diff options
Diffstat (limited to 'src/gui/gui_basegrid.pas')
| -rw-r--r-- | src/gui/gui_basegrid.pas | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/gui/gui_basegrid.pas b/src/gui/gui_basegrid.pas index 558c0c70..3ff8a6ea 100644 --- a/src/gui/gui_basegrid.pas +++ b/src/gui/gui_basegrid.pas @@ -1,7 +1,7 @@ { fpGUI - Free Pascal GUI Library - Copyright (C) 2006 - 2007 See the file AUTHORS.txt, included in this + 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, @@ -19,12 +19,6 @@ 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} interface @@ -1062,7 +1056,7 @@ begin else begin if (FFirstRow + VisibleLines - 1) < FFocusRow then - FFirstRow := FFocusRow - VisibleLines + 1; + FFirstRow := FFocusRow - VisibleLines;// + 1; end; { if/else } if FFocusCol < FFirstCol then |