Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Как вернуть Скролл на прежнее место.   Найти похожие ветки 

 
Дмитрий С ©   (2010-04-14 09:41) [0]

Есть TListView. Делаю beginupdate, clear, вставка строк, endupdate, при этом скролл сдивгается в самый верх, а как вернуть туда, где он был?

Делал Get/SetScrollPos - не помогает, скролл остается там, где был.


 
oldman ©   (2010-04-14 09:45) [1]

Может при cleаr все и рушится?


 
Дмитрий С ©   (2010-04-14 09:46) [2]


> oldman ©   (14.04.10 09:45) [1]
>
> Может при cleаr все и рушится?

Понятно, что рушиться, а как вернуть?


 
Leonid Troyanovsky ©   (2010-04-14 09:46) [3]


> Дмитрий С ©   (14.04.10 09:41)  

TopItem?

--
Regards, LVT.


 
Дмитрий С ©   (2010-04-14 10:10) [4]


> TopItem?

к сожалению ReadOnly.


 
Leonid Troyanovsky ©   (2010-04-14 10:17) [5]


> Дмитрий С ©   (14.04.10 10:10) [4]

LVM_SCROL ?

--
Regards, LVT.


 
Дмитрий С ©   (2010-04-14 18:55) [6]


> Leonid Troyanovsky ©   (14.04.10 10:17) [5]

Пока сделал так:
I := TopItem.Index
...
postmessage(List.Handle, LVM_SCROL, 0, I*16);

Работает почти так, как хочется. Знать бы еще что вместо 16и написать.

А есть более универсальный способ для окон со встроенными скроллами (TListView, TListBox, TMemo, ...)?


 
HF-Trade ©   (2010-04-15 05:00) [7]

Selected
ItemIndex


 
Leonid Troyanovsky ©   (2010-04-15 08:32) [8]


> Дмитрий С ©   (14.04.10 18:55) [6]

> postmessage(List.Handle, LVM_SCROL, 0, I*16);

SendMessage.

> Знать бы еще что вместо 16и написать.

The height of a line.

Хотя, наверное, проще как-то так:
I := TopItem.Index;
..
Items[I].MakeVisible(False);

> А есть более универсальный способ для окон

Нет, AFAIK.

--
Regards, LVT.



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.076 c
15-1267466564
М. Береговой
2010-03-01 21:02
2010.08.27
Что за полосы на дне Тихого Океана?


15-1267253714
Григорьев Антон
2010-02-27 09:55
2010.08.27
Умер Архангельский


4-1238501632
JayMax
2009-03-31 16:13
2010.08.27
Проблема с запуском системного приложения с Delphi


2-1275153874
Mishka
2010-05-29 21:24
2010.08.27
panel + statusbar(SizeGrip)


11-1218148886
cjfan
2008-08-08 02:41
2010.08.27
ошибка компиляции любого демо-проекта