Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.10;
Скачать: CL | DM;

Вниз

Фильтр   Найти похожие ветки 

 
TDIONIS ©   (2003-06-25 19:32) [0]

Всем привет! Понимаю, что вопрос глупый, но все когда - то учились. Не подскажите процедуру, которая фильтрует содержимое ListBox1 по Edit1?Например, ListBox1.Items содержит b1, b2, c3, а после того, как в Edit1.Text появляется b, то в ListBox1 остаётся только b1 и b2.


 
Anatoly Podgoretsky ©   (2003-06-25 19:47) [1]

ListBox1.Clear/ListBox1.Add


 
TDIONIS ©   (2003-06-26 12:24) [2]

Вообще я могу добавить и удалить содержимое, надо же!Вопрос не в этом.


 
DelphiN! ©   (2003-06-26 13:30) [3]

Если тебе нужно удалить последнюю запись в listbox-е, то;
listbox1.Items.Strings[listbox1.Items.Count-1]:= "";
А вобще объясняй понятней


 
Smithson ©   (2003-06-26 13:54) [4]

Нет такой процедуры, пиши сам.


 
QUE ©   (2003-06-26 14:11) [5]

for i:=1 to length(Edit1.Text) do
begin
if copy(ListBox1.Items[i].Text,1,i) <> Edit1.text then del.
end;

Я с точки зрения синтаксиса написал не правилно ... но идея есть


 
Alex_Sudakov ©   (2003-06-26 14:55) [6]

Тогда уж
if ListBox1.Items.IndexOf(Edit1.Text)...


 
QUE ©   (2003-06-26 14:58) [7]

>Тогда уж
> if ListBox1.Items.IndexOf(Edit1.Text)...

Так остануться остальные, а в моем случае которые не нужно те погибнут ....


 
Alex_Sudakov ©   (2003-06-26 15:04) [8]

Прошу прощения, не понял вопроса. Тогда вот так:
if Pos(Edit1.Text,ListBox1.Items[i])=0 then del;

В твоем случае строки удалятся только если они ПОЛНОСТЬЮ совпадают, а у человека другая задача...



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

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

Наверх




Память: 0.48 MB
Время: 0.017 c
11-31168
IZVER
2002-11-01 13:09
2003.07.10
Как сохранить stream в файл?


1-31357
andrey__
2003-06-27 13:34
2003.07.10
Форма в TService


3-31075
Seven
2003-06-15 10:23
2003.07.10
Иерархия в IB


3-31071
rosl
2003-06-16 02:40
2003.07.10
не работает поиск


14-31396
Dmitriy O.
2003-06-20 09:19
2003.07.10
Пиво мастера Delphi