Скачать: CL | DM;

Здравствуйте, подскажите плз, как программно установить ListView   Найти похожие ветки 

← →
Layner ©   (2005-05-31 11:51) [0]

На опред строку, например в ListView(vsReport) 1000 строк, надо перейти к 500, и видеть ее в ListView, как это можно реализовать?
Есть что то - ListView1.ItemIndex:=500;, событие какое то происходит, но скролы у ListView стоят на месте.

---

← →
begin...end ©   (2005-05-31 11:56) [1]

TListView.TopItem

---

← →
begin...end ©   (2005-05-31 12:01) [2]

+ TListView.Scroll.

---

← →
Layner ©   (2005-05-31 13:03) [3]

begin...end
Спасибо, сделал как ниже, т.е. на опр. строку никак не сместить, а только координатами задавать смещение?
ListView.TopItem.Top:=100;
ListView.Scroll(1,100);

---

← →
begin...end ©   (2005-05-31 15:56) [4]

> 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 16:49) [5]

ПОнял, благодарю!!

---

← →
Юрий Зотов ©   (2005-06-01 01:25) [6]

ListView.Items[500].MakeVisible(False)

И все.

---

← →
Layner ©   (2005-06-01 09:47) [7]

Юрий Зотов
Спасибо, ещё лучше! :)

---

← →
Kerk ©   (2005-06-01 09:56) [8]

Юрий Зотов ©   (01.06.05 1:25) [6]
ListView.Items[500].MakeVisible(False)

Хм.. а я с LVM_ENSUREVISIBLE делал... RTFMить надо почаще :))))

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c