Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сихронизация видимого в ListBox и CheckListBox [D7]


ORMADA ©   (2006-07-13 09:31:00) 

Всем привет!
Интересует вот такой каверзный вопрос.
Как синхронизировать ! видимые! строки если кол-во строк у ListBox и CheckListBox одинаковое?
Сейчас у меня скрол возможен только ListBox.
Пытаюсь сделать так:
делаю наследника от TListBox ловлю сообщение WM_VSCROLL
но чё-то недогоняю какое сообщение послать CheckListBox чтобы синхронизировать видимые строки....


ORMADA   (2006-07-17 09:53:00) [1]

а прокрутить можно так...
CheckListBox1.Perform(LB_SETTOPINDEX, ListBox1.TopIndex, 0);


ORMADA   (2006-07-17 09:31:00) [2]

оказалось TopIndex отвечает за первую видимую строчку...;(


ORMADA   (2006-07-17 09:25:00) [3]

2 Kray
не совсем верно.. смотри

<невидимые>
1
2
</невидимые>
<видимые>
3
4 - <фокус>
5
</видимые>
<невидимые>
6
7
</невидимые>

по идее надо узнать номер первой видимой строки
и послать аналогичное сообщение CheckListBox


Kray   (2006-07-14 14:52:00) [4]

я бы посмотрел свойство фокуса на строчке.


ORMADA   (2006-07-14 14:43:00) [5]

попробую ещё раз...
постараюсь объяснить по другому
как выставить прокрутку в обоих списках на один и тот же уровень
пример:
ListBox
<невидимые>
1
2
</невидимые>
<видимые>
3
4
5
</видимые>
<невидимые>
6
7
</невидимые>

если кол-во строк в ListBox и CheckListBox равны
как прокрутить CheckListBox чтобы строки с аналогичными номерами(в примере строки с номером 3,4,5) были видны ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо