Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Scroll для ListView

25K
26 мая 2008 года
M.A.R.K
20 / / 08.12.2007
Привет всем.

Есть заполненный ListView, стиль - Report, нужно выделить определенный Item...
Делаю так:
ListView1.ListItems.Item(5).Selected = True
Добавлял разные команды, типа ListView1.SetFocus, Item постоянно выделяется, но Scroll стоит в начале (не показывает выделенный Item)...
Вопрос:
Нужно как-нибудь поставить Scroll на позицию выделенного Item' а
1. Стандартными способами
2. Через WinAPI (SendMessage и т.д.)

Заранее благодарен.
296
26 мая 2008 года
Virtuoso
331 / / 31.07.2005
Распространённый вопрос.
http://www.microsoft.com/Rus/Msdn/Activ/MSVB/Archive/Interface/Technique/ListView/268.mspx
25K
26 мая 2008 года
M.A.R.K
20 / / 08.12.2007
Virtuoso
Большое спасибо...
Можно ли отправить сообщение (какое?) (для прокрутки) в ListView?
296
26 мая 2008 года
Virtuoso
331 / / 31.07.2005
Цитата: M.A.R.K

Можно ли отправить сообщение (какое?) (для прокрутки) в ListView?


Что-то не пойму. Какое сообщение? Чтобы прокручивать программно, не изменяя выбранной строки?

25K
27 мая 2008 года
M.A.R.K
20 / / 08.12.2007
Virtuoso
Да. Я хочу просто прокрутить ListView...
296
27 мая 2008 года
Virtuoso
331 / / 31.07.2005
Код:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Any) As Long
Const WM_VSCROLL = &H115
Const SB_LINEUP = 0
Const SB_LINEDOWN = 1
Const SB_PAGEUP = 2
Const SB_PAGEDOWN = 3
Const SB_THUMBPOSITION = 4
Const SB_THUMBTRACK = 5
Const SB_TOP = 6
Const SB_BOTTOM = 7
Const SB_ENDSCROLL = 8

SendMessage ListView1.hwnd, WM_VSCROLL, КОНСТАНТА, ByVal 0&
Вместо "КОНСТАНТА" подставляешь нужное.
25K
27 мая 2008 года
M.A.R.K
20 / / 08.12.2007
Virtuoso
Большое спасибо. Очень помог.
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог