Как узнать, есть ли какие-либо данные для прокрутки в Quantum Grid 5?

Question

Я работаю в старом проекте, в Delphi 7, который использует Express Quantum Grid 5 от DevExpress.

Моя сетка не может отображать полосы прокрутки, поэтому у меня есть внешний навигатор для управления прокруткой.

Я могу прокручивать, используя метод GridView.Site.ScrollContent(ADirection), но я не знаю, как определить, есть ли данные для прокрутки в одном из четырех направлений (вверх, вниз, влево и вправо).

Мне нужно знать это, чтобы иметь возможность отключать кнопки навигации, когда навигация не требуется.

Кто-нибудь знает какое-либо решение или обходной путь для этой проблемы? Я не смог найти ни одного метода в сетке или его частях, который мог бы дать мне эту информацию.

Answer 1

Я нашел решение ...

Поскольку мы купили исходный код компонента, мы вносим в него некоторые изменения, когда это необходимо.

В этом случае я нашел защищенный метод с именем CanScrollData(ADirection) в controller, который используется в gridview. Все, что мне нужно было сделать, это сделать этот метод общедоступным, а затем использовать его.

Boolean canScrollLeft := Grid.ActiveView.Controller.CanScrollData(dirLeft)