- Код: Выделить всё
procedure TRxDBGrid.DrawFooterRows;
var
...
begin
TotalWidth := GetClientRect.Right;
// от сель --------------
if ScrollBarIsVisible(SB_HORZ) then
TotalYOffs := GCache.ClientHeight - (GetSystemMetrics(SM_CYHSCROLL) +
GetSystemMetrics(SM_SWSCROLLBARSPACING))
else
TotalYOffs := GCache.ClientHeight;
// до сель --------------
...
end;
выделенный комментарий - внесённые изменения. Я не спец в этом деле, но вреде работает!
alexs
Если всё верно, плз добавьте к себе в сорцы или по своему поправьте!