![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как организовать поиск в таблице table1 по принципу... [D5]
nitro313 © (2002-06-26 05:03:00)Народ, помогите:
Как организовать поиск в таблице table1 по принципу: Нашел запись, искать далее?
Заране благодарен.
VAleksey (2002-06-27 06:30:00) [1]
> nitro313 (27.06.02 03:22)
совсем народ обнаглел.
Для неполного совпадения используй FindNearest все остальное см
> Lola © (26.06.02 19:36)
nitro313 (2002-06-27 03:22:00) [2]Напишите пожалуйста алгоритм поиска не полным совпадением, а частичным.
Заранее благодарен.
Lola (2002-06-26 19:36:00) [3]
with Table1 do
begin
IndexFieldNames:="Otdel;Fam";
EditKey;
FieldByName("Otdel").AsString := Edit1.Text;
FieldByName("Fam").AsString := Edit2.Text;
if(not GotoKey) then ShowMessage("Запись не найдена")
else ShowMessage("Запись найдена")
end;
Вместо ShowMessage("Запись найдена") можно вставить окно диалога.
nitro313 (2002-06-26 14:58:00) [4]Нашите пожалуйста, кто-нибудь работающий алгоритм поиска. "Нашел-искать далее". Очень нужно!!!
Заранее спасибо.
Lola (2002-06-26 11:08:00) [5]Только перед FindNext вставь вопрос "Искать дальше? да нет"
VAleksey (2002-06-26 08:25:00) [6]Это тебе надо в базы данных.
Если поле индексное, то использовать FindFirst и FindNext