Форум » GUI » HScroll в TSBrowse » Ответить

HScroll в TSBrowse

krutoff: Долго не мог понять почему у меня не показывает горизонтальный скроллинг в TSBrowse. Если не применять ::LoadFields() -> то скроллинга не будет! Оказывается вся хитрость в таком коде: " If ! ::lNoHScroll .and. ::oHScroll != Nil //V90 ::oHScroll:SetRange( 1, Len( ::aColumns ) ) endif " Я думаю, что этот код надо ввести в начало активации TSBrowse ( может куда-нибудь в _EndTBrowse ()... )

Ответов - 1

gfilatov2002: Большое спасибо, поправил! Теперь инициализация горизонтального скроллинга в TSBrowse будет происходить при первой перерисовке бровса



полная версия страницы