Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.06.2008, 23:20   #1
Dissonance
Пользователь
 
Регистрация: 19.05.2008
Сообщений: 36
По умолчанию Поиск из делфи в Access

Подскажите как осуществить поиск из делфи в аксесс, по 2,3 полям. очень срочно
Dissonance вне форума Ответить с цитированием
Старый 08.06.2008, 00:10   #2
Snoopy
Форумчанин Подтвердите свой е-майл
 
Аватар для Snoopy
 
Регистрация: 14.01.2008
Сообщений: 163
По умолчанию

На мой взгляд самое оптимальное это SQL запросы!
Но делфи предоставляет методы Locate и LookUp, для поиска записей, а также можно отфильтровать, свойство Filter!
Snoopy вне форума Ответить с цитированием
Старый 08.06.2008, 11:03   #3
Dissonance
Пользователь
 
Регистрация: 19.05.2008
Сообщений: 36
По умолчанию

Мне надо SQL запросом у меня есть код на поиск по 1 полю. Но мне надо по 2, 3 полям. А есди не все поля будут заполнены то всё равно должен искать по оставшемся 2м
Dissonance вне форума Ответить с цитированием
Старый 08.06.2008, 11:05   #4
Dissonance
Пользователь
 
Регистрация: 19.05.2008
Сообщений: 36
По умолчанию

Цитата:
Сообщение от Dissonance Посмотреть сообщение
Мне надо SQL запросом у меня есть код на поиск по 1 полю. Но мне надо по 2, 3 полям. А есди не все поля будут заполнены то всё равно должен искать по оставшемся 2м
procedure TForm2.Button1Click(Sender: TObject);
begin
form2.DataSource1.DataSet:=form2.ad oquery1;
form2.adoquery1.SQL.text:='select * from [Оборудование] where [Наименование оборудования]="'+edit1.text+'"';
if (edit1.text<>'') then form2.adoquery1.SQL.text:='select * from [Оборудование] where [Наименование оборудования] ="'+edit1.text+'"';
form2.adoquery1.open;
end;
Dissonance вне форума Ответить с цитированием
Старый 08.06.2008, 15:55   #5
Snoopy
Форумчанин Подтвердите свой е-майл
 
Аватар для Snoopy
 
Регистрация: 14.01.2008
Сообщений: 163
По умолчанию

используйте and, or взависимости от условия вашего поиска
Код:
if (edit1.text<>'') then 
form2.adoquery1.SQL.text:='select * from [Оборудование]
 where ([Наименование оборудования] ="'+edit1.text+'")
 and ([pole2]="'+edit2.text+'") and ([pole3]="'+edit3.text+'") ' ;
Snoopy вне форума Ответить с цитированием
Старый 08.06.2008, 22:15   #6
Dissonance
Пользователь
 
Регистрация: 19.05.2008
Сообщений: 36
По умолчанию

спасибо большое
Dissonance вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуйста сделать поиск по базе данных в форме! Access 2003 LilijaSt Microsoft Office Access 19 25.12.2010 10:13
Как сделать сортировку (поиск) Delphi+Access Toska БД в Delphi 6 28.08.2008 22:32
задача Делфи - поиск нужного и замена Katovski Помощь студентам 8 30.05.2008 21:28
Как сделать поиск по компу на делфи gred Помощь студентам 6 21.04.2008 22:51
Delphy и Access.вводя инфу во вторичный файл Access, она отражалась в первом ADOTable Lev БД в Delphi 0 11.11.2007 12:14