Как сделать скролл ListView в начальную строку без WinAPI ?

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
Alex2013
долгожитель
Сообщения: 3230
Зарегистрирован: 03.04.2013 11:59:44

Как сделать скролл ListView в начальную строку без WinAPI ?

Сообщение Alex2013 »

Вообщем Сабж!
Пока что догадался сделать так :

Код: Выделить всё

   SendMessage(ListView1.Handle, WM_VSCROLL, SB_TOP, 0);
Но "нафига козе боян" если по идее можно юзать
ListView1.ScrollBy ( или ListView1.ScrollBy_WS )

Добавлено спустя 16 минут 23 секунды:
Пробовал так ...
With ListView1 do
if Items.Count>0 then
begin
R:=Items[0].DisplayRect(drBounds);
J:=TopItem.Index*(r.Bottom-r.Top);
ScrollBy (0,-J);
end;
..но мертвы бжолы не гудют!
Вылезает ошибка еще на DisplayRect(drBounds);... :(
delphius
постоялец
Сообщения: 131
Зарегистрирован: 18.03.2020 12:40:11

Сообщение delphius »

Alex2013 писал(а):мертвы бжолы не гудют!
гудют, то тыхо-тыхо...

Код: Выделить всё

ListView1.Items[0].MakeVisible(False);
Alex2013
долгожитель
Сообщения: 3230
Зарегистрирован: 03.04.2013 11:59:44

Сообщение Alex2013 »

Спасибо, попробую ! :idea:
Alex2013
долгожитель
Сообщения: 3230
Зарегистрирован: 03.04.2013 11:59:44

Сообщение Alex2013 »

Проверил работает !
Ответить