Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.011 c
3-70654
Squ
2002-07-02 10:03
2002.07.22
Halcyon...исходники


6-70854
Jeck
2002-05-13 12:11
2002.07.22
Вопрос


1-70782
BlackSun
2002-07-10 01:34
2002.07.22
Программно нажать ссылку в TWebBrowser


14-70912
Dim!S
2002-06-21 13:04
2002.07.22
Interbase


3-70586
Duce
2002-06-28 14:43
2002.07.22
Строка, которую TQuery упорно считает MEМО