summaryrefslogtreecommitdiff
path: root/src/gui
diff options
context:
space:
mode:
Diffstat (limited to 'src/gui')
-rw-r--r--src/gui/gui_basegrid.pas10
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