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

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

Все равно не работает поиск в BD


Vita-mebel ©   (2005-05-26 11:00:00) 

может и работает но в DBGrid не отображает.

procedure TForm1.Edit1Change(Sender: TObject);
begin

 ADOTable1.Filtered:=true;

ADOTable1.Filtered := Length(Edit1.Text) > 0;
ADOTable1.Filter := '[Телефон]>"' + Edit1.Text + '"'
end;


Anatoly Podgoretsky   (2005-05-26 11:25:00) [1]

А где про поиск?


DSKalugin   (2005-05-26 11:09:00) [2]

поставь опции фильтра для частичного сравнения и замени знак "больше" на "равно"
property FilterOptions: TFilterOptions;

foNoPartialCompare Asterisks (*) in the filter are treated as literal characters rather than as wildcards. When filter options does not include foNoPartialCompare, strings that end in an asterisk signify a partial string match with the asterisk matching any number of characters.


Sergey13   (2005-05-26 11:04:00) [3]

2Vita-mebel   (26.05.05 11:00)
Обычно сначала присваивают значение фильтру, а потом применяют это дело.


Val   (2005-05-26 11:04:00) [4]

? фильтрация <> поиск.
To apply filter conditions specified in the Filter property or the OnFilterRecord event handler, set Filtered to true
создаем фильтр, _затем_ включаем.


Наверх

Титульная страница Поиск, карта сайта Написать письмо