Поиск записей в ListBox - БД в Delphi

Askat · 18.06.2007, 08:09

Как сделать поиск записей в ListBox'е с последующим выводом ошибки (типа, нет таких записей)?

Alex21 · 18.06.2007, 10:05

Код:

ListBox1.ItemIndex:=-1;
ListBox1.Perform(LB_SELECTSTRING,-1,longint(Pchar(Edit1.text)));
if ListBox1.ItemIndex=-1 then
ShowMessage('Такого тут небыло отродясь!!!');

18.06.2007, 08:09	#1
Askat Пользователь Регистрация: 11.06.2007 Сообщений: 20	Поиск записей в ListBox Как сделать поиск записей в ListBox'е с последующим выводом ошибки (типа, нет таких записей)?

18.06.2007, 10:05	#2
Alex21 With best regards Участник клуба Регистрация: 20.04.2007 Сообщений: 1,448	Код: `ListBox1.ItemIndex:=-1; ListBox1.Perform(LB_SELECTSTRING,-1,longint(Pchar(Edit1.text))); if ListBox1.ItemIndex=-1 then ShowMessage('Такого тут небыло отродясь!!!');` Life is too short, play more... Как правильно задавать вопросы

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Поиск в listbox, но дургой	Черничный	Общие вопросы Delphi	3	30.06.2008 21:28
Поиск нескольких записей	VenMaster	БД в Delphi	1	14.06.2008 22:48
Поиск в ListBox	Spectre	Компоненты Delphi	9	14.01.2008 20:04
Удаление записей	Arsgun	БД в Delphi	7	09.07.2007 11:56
Поиск в ListBox	kodov	Компоненты Delphi	2	19.03.2007 20:58