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

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

Автоскролинг в ListBox'e


Ingwar ©   (2006-11-18 23:29:00) 

Как сделать сабж? Пытаюсь воспользоваться ScrollBy, но получаются какие-то кракозябры.


 lbLog.Items.Append(txt);
 lbLog.ScrollBy(0,-18);


Заранее благодарен за помощь!


Ingwar   (2006-11-22 08:21:00) [1]

Спасибо! Попробую!


RASkov   (2006-11-20 23:36:00) [2]

> [6] Palladin ©   (20.11.06 23:33)

И в самом деле:), я не вдавался в подробности, а так как такого простого ответа не было ну и подумал....


Palladin   (2006-11-20 23:33:00) [3]


> [5] RASkov  

а чего так сложно то? :)
lbLog.TopIndex:=lbLog.Items.Count-1;


RASkov   (2006-11-20 23:29:00) [4]

Попробуй так
lbLog.Perform(LB_SETTOPINDEX, lbLog.Items.Count-1, 0);


Ingwar   (2006-11-20 08:22:00) [5]

Честно говоря я и сам не знаю... Вроде бы он должен скроллировать на некоторое расстояние.... Хотя может я чего-то не правильно перевел (что скорее   всего).

А вообще-то, мне нужно сделать автоскроллинг на последнюю добавленную запись, но при этом чтобы ListBox не брал на себя фокус. Я думал ScrollBy мне в этом поможет, но увы =(


RASkov   (2006-11-20 00:22:00) [6]

:)
А в чем глубокий смысл это ScrollBy? Я вот сейчас ради интереса попробывал на нескольких компанентах сей метод - нифика не понял для чего он:( Он(компонент) этим методом отрисовывает сам себя на своей канве, и соответственно стирается при "удобном" случае.


Ingwar   (2006-11-19 13:09:00) [7]

To RASkov: Спасибо! Кракозябры исчезли, но и скроллинг исчез =(


RASkov   (2006-11-19 02:14:00) [8]

lbLog.Items.Append(txt);
lbLog.ScrollBy(0,-18);
lbLog.Invalidate;


Наверх

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