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

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

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

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

Сообщение Alex2013 » 13.03.2023 23:19:26

Вообщем Сабж!
Пока что догадался сделать так :
Код: Выделить всё
   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);... :(
Alex2013
долгожитель
 
Сообщения: 2923
Зарегистрирован: 03.04.2013 11:59:44

Re: Как сделать скролл ListView в начальную строку без WinAP

Сообщение delphius » 15.03.2023 11:19:54

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

гудют, то тыхо-тыхо...

Код: Выделить всё
ListView1.Items[0].MakeVisible(False);
delphius
постоялец
 
Сообщения: 122
Зарегистрирован: 18.03.2020 13:40:11

Re: Как сделать скролл ListView в начальную строку без WinAP

Сообщение Alex2013 » 15.03.2023 20:38:26

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

Re: Как сделать скролл ListView в начальную строку без WinAP

Сообщение Alex2013 » 19.03.2023 16:44:46

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


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: Google Adsense [Bot] и гости: 34

Рейтинг@Mail.ru