пошаговый поиск

← →
Archey (2002-05-12 20:31) [0]

Добрый вечер! Необходим DBEdit с возможностью инкрементального (пошагового) поиска в таблице по указанному полю. В случае отсутствия записи с искомым значением поля (например, ‘Иванов’ в поле ‘FIO’) выдавал бы message – «Запись не найдена. Создать новую запись для ‘Иванов’? ДА/НЕТ».

← →
Konorl (2002-05-12 20:42) [1]

По моему мнению для инкрементного поиска по этому полю нужно иметь индекс. access имеет возможность создать индекс по полю. Что вы будете использовать ADO? Далее нужен провайдер и вот тут, в этой связке, проблемки с управлением индексом!
Так, что либо откажись от access, либо делай все в нем (IMHO)

← →
archey (2002-05-15 12:29) [2]

Ура!!! Сам сделал! Нашел компонент wwIncrementalSearch , такой дбэдит с возможностью инкрементного (или инкрементального, судя по названию компонента) поиска, далее:

procedure TForm1. wwIncrementalSearchFIOExit(Sender: TObject); begin if wwIncrementalSearchFIO.text<>ADOTable_Mainfio.asstring then AboutBox.ShowModal; end;
Я поставил для тренировки AboutBox. Работает как пулемет (ADO+Access), поле, кстати не ключевое.
Большое мерси кого побеспокоил.

пошаговый поиск Найти похожие ветки