Форум: "Основная";
Текущий архив: 2006.01.15;
Скачать: [xml.tar.bz2];

Вниз

Как в ListBox определить количество строк видимых на экране?   Найти похожие ветки 

← →
Mishenka   (2005-12-13 20:01) [0]

Как в ListBox определить количество строк видимых на экране?

---

← →
begin...end ©   (2005-12-13 20:18) [1]

Думаю, что можно определить только приблизительно, "в лоб":

Count := Min(Round(ListBox.ClientHeight / ListBox.ItemHeight), ListBox.Count)

---

← →
Джо ©   (2005-12-14 01:21) [2]

Если "строго" подходить, то нужно еще учитывать случай окончания списка, то есть, определять по остаток по TopIndex и концу списка и эту разницу учитывать в значении, определяемом begin...end.

---

← →
Leonid Troyanovsky ©   (2005-12-14 09:31) [3]

> Mishenka   (13.12.05 20:01)  
> Как в ListBox определить количество строк видимых на экране?


Индекс верхней видимой строки:

t := ListBox.Perform(LB_GETTOPINDEX, 0, 0);

Индекс последней видимой строки:

 with ListBox do
    b := LoWord(Perform(LB_ITEMFROMPOINT, 0, MakeLParam(0, ClientHeight)));

--
Regards, LVT.

---

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

Форум: "Основная";
Текущий архив: 2006.01.15;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.014 c