Пока что догадался сделать так :
- Код: Выделить всё
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);...
