Re: RxFPC - новая версия
Добавлено: 22.01.2012 20:42:05
Возникла (она и была) такая мелкая фигня: нижний scroll (когда он появляется) полностью перекрывает footer! Видимо у всех всё нормально, т.к. по поиску ничего не нашёл! RxLib использую от 14.01.2012г. В общем, если у кого также или кому это интересно:
выделенный комментарий - внесённые изменения. Я не спец в этом деле, но вреде работает!
alexs
Если всё верно, плз добавьте к себе в сорцы или по своему поправьте!
Код: Выделить всё
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
Если всё верно, плз добавьте к себе в сорцы или по своему поправьте!