Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.03;
Скачать: CL | DM;

Вниз

CheckListBox - принудительный скроллинг?   Найти похожие ветки 

 
Fishka   (2002-09-18 14:04) [0]

Отмечаю элемент в конце списка. По нажатию одной из клавиш размер CheckListBox-а уменьшаю (надо так). Выделенный элемент CheckListBox-а становится вне области видимости (где-то ниже).
Что мне сделать, чтобы при изменениях размера CheckListBox-а выделенный элемент всегда был виден на экране?
(Что-то типа принудительной прокрутки.)


 
Song ©   (2002-09-18 14:32) [1]

Установить на него TCheckListBox.ItemIndex


 
Fishka   (2002-09-18 15:04) [2]

ItemIndex в этот момент и так равен номеру текущего выделенного элемента, но сам Item вне области видимости.


 
Fishka   (2002-09-19 16:29) [3]

Очень хочется получить совет ....


 
Ученик ©   (2002-09-19 16:38) [4]

SendMessage(CheckListBox1.Handle, LB_SETTOPINDEX, CheckListBox1.ItemIndex, 0);


 
Fishka   (2002-09-20 09:51) [5]

Спасибо. Это кажется то, что нужно.


 
Kibitzer   (2002-09-20 16:18) [6]


> Ученик © (19.09.02 16:38)
> SendMessage(CheckListBox1.Handle, LB_SETTOPINDEX, CheckListBox1.ItemIndex, 0);


Нююю, это можно сделать и проще: CheckListBox1.TopIndex := CheckListBox1.ItemIndex

А вот более корректно, помоему так:
if CheckListBox1.MultiSelect
then SendMessage(CheckListBox1.Handle, LB_SETCARETINDEX, CheckListBox1.ItemIndex, 0)
else SendMessage(CheckListBox1.Handle, LB_SETCURSEL, CheckListBox1.ItemIndex, 0);


 
Ученик ©   (2002-09-20 16:35) [7]

>Kibitzer (20.09.02 16:18)
:-)






Страницы: 1 вся ветка

Текущий архив: 2002.10.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
14-8119
race1
2002-09-07 09:50
2002.10.03
табличка


1-7891
Eva
2002-09-23 12:31
2002.10.03
перекачка данных по расписанию


1-7926
vinni2000
2002-09-23 19:13
2002.10.03
Вопрос по ShellExecute


1-8033
Mazenrat
2002-09-20 15:18
2002.10.03
Активен ли таймер (SetTimer)?


1-8039
novarm44
2002-09-22 03:06
2002.10.03
Доступ к тексту HTML в TWebBrowser