Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

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

 
Дмитрий С ©   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.064 c
15-1267032774
Кто б сомневался
2010-02-24 20:32
2010.08.27
Delphi roadmap


15-1269207002
Юрий
2010-03-22 00:30
2010.08.27
С днем рождения ! 22 марта 2010 понедельник


15-1266165222
Czz
2010-02-14 19:33
2010.08.27
Win7 - не запускается проводник 2


2-1269095631
r_yevgeniy
2010-03-20 17:33
2010.08.27
Программа поразрядной инверсии десятичных чисел


15-1274808723
Lyonux
2010-05-25 21:32
2010.08.27
Работа сайта





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский