RxFPC:fix show last row in RxDBGrid

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6040 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2017-10-24 12:38:03 +00:00
parent 3b066e0ae0
commit c460bc96be

View File

@ -5229,13 +5229,15 @@ begin
if FFooterOptions.Active then
H:=H - GetDefaultRowHeight * FFooterOptions.RowCount;
Result := H div GetDefaultRowHeight;
if rdgFilter in OptionsRx then
Dec(Result, 1);
if dgTitles in Options then
Dec(Result, 1);
//Dec(Result, 1);
Result:=Result - RowHeights[0] div GetDefaultRowHeight;
end
else
Result := 1;