![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Здравствуйте, подскажите плз, как программно установить ListView
Layner © (2005-05-31 11:51:00)На опред строку, например в ListView(vsReport) 1000 строк, надо перейти к 500, и видеть ее в ListView, как это можно реализовать?
Есть что то - ListView1.ItemIndex:=500;, событие какое то происходит, но скролы у ListView стоят на месте.
Kerk (2005-06-01 09:56:00) [1]Юрий Зотов © (01.06.05 1:25) [6]
ListView.Items[500].MakeVisible(False)
Хм.. а я с LVM_ENSUREVISIBLE делал... RTFMить надо почаще :))))
Layner (2005-06-01 09:47:00) [2]
Юрий Зотов
Спасибо, ещё лучше! :)
Юрий Зотов (2005-06-01 01:25:00) [3]ListView.Items[500].MakeVisible(False)
И все.
Layner (2005-05-31 16:49:00) [4]ПОнял, благодарю!!
begin...end (2005-05-31 15:56:00) [5]> Layner © (31.05.05 13:03) [3]
var
N: Integer; // Индекс строки, до которой надо прокрутить
begin
with ListView do
Scroll(0, высота_одного_элемента * (N - TopItem.Index))
end.
--------------------
Sorry, I'm drunk now
Layner (2005-05-31 13:03:00) [6]
begin...end
Спасибо, сделал как ниже, т.е. на опр. строку никак не сместить, а только координатами задавать смещение?
ListView.TopItem.Top:=100;
ListView.Scroll(1,100);
begin...end (2005-05-31 12:01:00) [7]+ TListView.Scroll.
begin...end (2005-05-31 11:56:00) [8]TListView.TopItem