Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.09.2009, 02:23   #1
VadEr
Форумчанин
 
Аватар для VadEr
 
Регистрация: 24.03.2009
Сообщений: 375
По умолчанию Нижний конец списка в ListBox

Всем привет!
Вопрос такой, в Listbox программно выводится длинный список, как сделать чтобы последняя запись при выводе всегда была видна (т.е. бегунок автоматически прокручивался)?
VadEr вне форума Ответить с цитированием
Старый 10.09.2009, 04:21   #2
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Код:
ListBox1.ItemIndex := ListBox1.Items.Count - 1;
Баламут вне форума Ответить с цитированием
Старый 10.09.2009, 07:54   #3
mosq
Пользователь
 
Регистрация: 28.08.2009
Сообщений: 90
По умолчанию

Цитата:
Сообщение от Баламут Посмотреть сообщение
Код:
ListBox1.ItemIndex := ListBox1.Items.Count - 1;
добавлю, что засунуть это в событие ListBox1.onChange
mosq вне форума Ответить с цитированием
Старый 10.09.2009, 12:06   #4
VadEr
Форумчанин
 
Аватар для VadEr
 
Регистрация: 24.03.2009
Сообщений: 375
По умолчанию

Спасибо Баламут! Сработало.
VadEr вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как в lable задать степень (нижний и верхний регистр) Polotenchik Общие вопросы Delphi 17 17.07.2009 23:30
Загрузка списка в ListBox aval Microsoft Office Excel 4 09.06.2009 11:14
Загрузка списка в ListBox reyn90 Помощь студентам 2 31.05.2009 04:17
Как ускорить загрузку списка ListBox из txt-файла? Dux Компоненты Delphi 24 30.10.2008 19:02
Не открывает из списка файлов ListBox SANTA_KLAUD Общие вопросы Delphi 8 27.05.2008 20:30