Главная страница
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.013 c
3-70649
dimanew
2002-07-02 05:06
2002.07.22
Когда используешь TTable при каждом запросе постоянно


1-70827
Andrew_k
2002-07-02 11:09
2002.07.22
трабл с ParamStr!!! Хелп, плз!!!


3-70596
den74
2002-06-27 16:41
2002.07.22
DBGrid


6-70840
SLY-YO
2002-05-11 14:21
2002.07.22
Исходники программы Remote Administrator


3-70628
Mamed
2002-07-01 13:49
2002.07.22
Operator Like HELP!!!!