| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Поиск ПОД-строки в ListBox ? [D6]

Gonza ©   (2002-10-03 23:28:00) 

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

---

Gonza   (2002-10-04 14:54:00) [1]

2REA

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

А чем ListView лучше?

---

REA   (2002-10-04 10:30:00) [2]

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

---

Gonza   (2002-10-04 09:36:00) [3]

Понятно.

Спасибо!

---

Song   (2002-10-04 09:34:00) [4]

Нет.

---

Gonza   (2002-10-04 08:25:00) [5]

>>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;

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

---

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

Попробуйте:

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

---

Gonza   (2002-10-04 01:25:00) [7]

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

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

---

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

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

---

Наверх