Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.14;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.012 c
6-45488
gsergey
2002-08-13 14:56
2002.10.14
Как организовать мапинг портов через HTTP или HTTPS прокси сервер


14-45564
Djon
2002-08-26 15:43
2002.10.14
Кто на пишет бухгалтерию???


3-45193
Andriano
2002-09-23 08:55
2002.10.14
Хорошая книга по INTERBASE


14-45565
kaif
2002-09-16 14:08
2002.10.14
Эзоп - первый антидельфиец.


1-45301
Lexer
2002-10-04 16:20
2002.10.14
Объединение ячеек