Главная страница
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.019 c
1-7960
vlv
2002-09-24 10:47
2002.10.03
Работа с Com-портом


1-7941
Fog
2002-09-20 13:54
2002.10.03
Я пока еще ламо?


3-7789
Dimedrol
2002-09-11 13:37
2002.10.03
FastReport, номера страниц


1-7934
siliks330
2002-09-19 16:38
2002.10.03
Как можно изменить регион ЧУЖОГО окна?


3-7800
Vavan
2002-09-11 21:15
2002.10.03
Помогите чайнику