On-line: PSP, tnsr2, гостей 0. Всего: 2 [подробнее..]
АвторСообщение





Пост N: 89
Зарегистрирован: 08.11.05
ссылка на сообщение  Отправлено: 20.06.06 14:18. Заголовок: Продолжение о TsBrowse


Незнаю почему, но когда утром писал слова благодарности, ветка исчезла. Почему не знаю.
Продолжил играться с TsBrowse. И опять иинтересная вещь появилась.
Инициализирую TsBrowse одним элементом массива (100, 20,30 ...)- вертикальный скрол отсутствует. Вроде правильно.
Изменяю массив. чтобы было N-элементов, даю функцию SetArray - массив отображается, но вертикальный скрол отсутствует, хотя клавиатурой перемещаться дает. Впечатление такое, что при изменении размерности отображаемого массива свойство lNoVScroll = .T.. Перевожу его в .F. - скрол начинает работать. Так и должно работать или ...?



Спасибо: 0 
Профиль
Ответов - 7 [только новые]







Пост N: 90
Зарегистрирован: 08.11.05
ссылка на сообщение  Отправлено: 20.06.06 14:48. Заголовок: Re:


Прошу не бить ногами, но кажется нашел в чем бяка.
TsBrowse.lib/h_tbrowse.prg/Method Resrt(). Там примерно в районе строки 8250 есть проверка свойства
...
If ! ::lNoVScroll
If ::nLen <= ::nRowCount
::lNoVScroll :=.t.
endif
If ::nLen <= ::nRowCount .and. ::oVScroll != Nil
::oVScroll:nMax := -1
Else
nMin := Min( 1, ::nLen )
nMax := Min( ::nLen, MAX_POS )
nPage := Min( ::nRowCount(), ::nLen )
::oVScroll := TSBScrlBar():WinNew( nMin, nMax, nPage, .T., Self )
::oVScroll:SetPage( nPage, .T. )
EndIf

EndIf
...

Впечатление такое, что раз выставив свойство lNoVScroll в .T. больше оно нигде не меняется.
Я поставил в начале метода
...
::lAppendMode := .F.
//20.06.2006
::lNoVScroll := .F.
...
И вроде все заработало без принуждения.

Спасибо: 0 
Профиль
модератор




Пост N: 192
Зарегистрирован: 25.05.05
ссылка на сообщение  Отправлено: 20.06.06 15:21. Заголовок: Re:


Владимир пишет:

 цитата:
Я поставил в начале метода
...
::lAppendMode := .F.
//20.06.2006
::lNoVScroll := .F.
...
И вроде все заработало без принуждения.


Владимир! Спасибо за коррекцию - будет исправлено в следующем релизе

Спасибо: 0 
Профиль





Пост N: 91
Зарегистрирован: 08.11.05
ссылка на сообщение  Отправлено: 20.06.06 15:23. Заголовок: Re:


gfilatov
Ну наконец-то и я на что-то сгодился

Спасибо: 0 
Профиль
модератор




Пост N: 193
Зарегистрирован: 25.05.05
ссылка на сообщение  Отправлено: 20.06.06 16:01. Заголовок: Re:


Владимир пишет:

 цитата:
Ну наконец-то и я на что-то сгодился


Так держать!!!


Спасибо: 0 
Профиль
администратор




Пост N: 283
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 20.06.06 16:25. Заголовок: Re:


Тему я перенес ;)
Вроде ей тут самое место http://clipper.fastbb.ru/index.pl?1-1-0-00000044-000-0-0-1150783273

Спасибо: 0 
Профиль





Пост N: 92
Зарегистрирован: 08.11.05
ссылка на сообщение  Отправлено: 21.06.06 08:59. Заголовок: Re:


Dima
Sorri.
Тогда и эту туда же

Спасибо: 0 
Профиль
администратор




Пост N: 284
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 21.06.06 17:54. Заголовок: Re:


Владимир пишет:

 цитата:
Тогда и эту туда же


Хорошо.
Done ;)

Спасибо: 0 
Профиль
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 89
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет