Вниз
Скачать: CL | DM;

Поиск ПОД-строки в ListBox ?   Найти похожие ветки 

 
Gonza ©   (2002-10-03 23:28) [0]

Подскажите плиз!
Как можно быстро реализовать сабж??


 
Юрий Зотов ©   (2002-10-04 01:06) [1]

Pos("...", ListBox.Items.Text)


 
Gonza ©   (2002-10-04 01:25) [2]

Юрий Зотов © (04.10.02 01:06)

Может я не совсем точно выразился, но хотелось бы выделить эту строку...


 
Юрий Зотов ©   (2002-10-04 01:51) [3]

Попробуйте:

SendMessage(ListBox.Handle, LB_SELECTSTRING, -1, Integer(PChar(MyString)));


 
Gonza ©   (2002-10-04 08:25) [4]

>>SendMessage(ListBox.Handle, LB_SELECTSTRING, -1, Integer(PChar(MyString)));

Это мне известно... в FAQ есть.
Но мне не подходит, т.е. например, в LisBox такие строки:

1. йцуфыв
2. ИСКОМАЯ_СТРОКАвалдвьп
3. впвыап
4. жапьтИСКОМАЯ_СТРОКА

А LB_SELECTSTRING найдет и выделит только 2 строку, а 4 не найдет ( и в хелпе об этом сказано), а хотелось бы найти еще и 4 строку...
Пока сделал так:

var i:integer;
Start:integer;
begin
if Edit1.Text="" then exit;
if ListBox.ItemIndex<0 then Start:=0
else Start:=ListBox.ItemIndex;
for i:=Start+1 to ListBox.Count-1 do
if Pos(Edit1.Text,ListBox.Items[i])>0 then
begin
ListBox.ItemIndex:=i;
break;
end;

Может есть способ по лучше?


 
Song ©   (2002-10-04 09:34) [5]

Нет.


 
Gonza ©   (2002-10-04 09:36) [6]

Понятно.

Спасибо!


 
REA   (2002-10-04 10:30) [7]

тогда лучше CheckBox используй или ListView


 
Gonza ©   (2002-10-04 14:54) [8]

2REA

Что-то я с CheckBox не пойму, как его вместо ListBox тспользовать...

А чем ListView лучше?



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

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



Память: 0.46 MB
Время: 0.043 c
1-45375
Itap
2002-10-06 12:51
2002.10.14
Delphi и Excel


1-45357
race1
2002-10-06 10:27
2002.10.14
listview


4-45648
EugeneCher
2002-09-01 22:53
2002.10.14
SetTimer


1-45305
BOA_KAA
2002-10-04 17:18
2002.10.14
Триангуляция Делоне в Delphi


6-45479
Сергей Ф
2002-07-05 16:51
2002.10.14
Как узнать, доступен ли компьютер с заданным ip-адресом в LAN?




   Наверх