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

Вниз

ListBox1   Найти похожие ветки 

← →
eruc   (2002-07-09 22:10) [0]

Есть ListBox1
у него MultuSelect:=true;
Выделяем в нем несколько строк

Как узнать с какой и по какую строку мы выделили ?

:)

---

← →
NailMan ©   (2002-07-10 02:05) [1]

Var i,Min,Max:integer;

begin

Min:=-1;
Max:=-1;
For i:=0 to ListBox1.Items.Count-1 do
if ListBox1.Selected[i] then
begin
if min<0 then min:=i;
Max:=i;
end;
end;

В итоге:
min - начальный индекс строки
Max - Конечный индекс строки

Но если между Min и Max есть невыделенные строки, то они посчитаются за таковые, поэтому выделенные индексы надо в массивчик заносить, и потом с ним и работать.

---

← →
TTCustomDelphiMaster ©   (2002-07-10 08:36) [2]

Посмотри как работает
function TCustomListBox.GetSelected(Index: Integer): Boolean;
и почитай про LB_GETSELITEMS

---

← →
Andrey007   (2002-07-10 09:22) [3]

for i:=0 to ListBox.Items.Count-1 do if ListBox.Selected[i] then
begin
// наткнулись на выделенную строку
end
else
begin
// невыделенная строка
end

---

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

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

Наверх

Память: 0.47 MB
Время: 0.007 c