Поиск данных в Delphi

[_Тома_]

Помогите пожалуйста....
Мне в Delphi надо создать кнопку 'поиск': вводить значения в Edit (например ФИО,Должность, телефон и т.д.) и при нажатии кнопки, чтобы значения выводились в DBGrid. (DBGrid подключен к базе данных и там хранятся все значения).

[Stilet]

Ну а чем помочь?

[_Тома_]

нужен код этой кнопки.

мда уж, чувствую помощи я здесь не дождусь...

[eval]

так каков вопрос такой и ответ, или вы думаете тут форум экстрасенсов, и они могут через астрал понять что у вас за субд, структура базы, и т.п.?
не форум экстрасенсов не тут

[Stilet]

чувствую помощи я здесь не дождусь...

Чтож. Бывает и такое. Ты думала что тебе вот так сразу код кинут? Сначала задай вопрос правильно, так чтоб было понятна его суть, иначе без вариантов.

[_Тома_]

Простите, за некорректный вопрос,попробую сформулировать понятнее.
у меня Delpfi подключен к базе данных и в одной из вкладок, а именно "Сотрудники" надо сделать запрос. При вводе значений в Edit (например Имя (Иван),Фамилия (Иванов),Должность(Администратор) и т.д.) по этим параметрам осуществить поиск,т.е. при нажатии кнопки "Поиск" эти параметры (или если поиск осуществляется по имени только) выводились в DBGrid. (т.е. ввели имя Иван в Edit1 и все значения (Фамилия,Должность,телефон) о нем высветились DBGrid при нажатии кнопки "Поиск" (все эти значения уже добавлены в БД)).

[Stilet]

Используется Query?
Если нет то:

with Dbgrid.DataSource.DataSet do begin
 filter:=
  'Фамилия='+QuotedStr(Edit1.text)+' AND '+
  'Должность='+QuotedStr(Edit2.text)+' AND '+
  'телефон='+QuotedStr(Edit3.text);
end;

Если да то

with Query do begin
 close;
 sql.text:='select * from Сотрудники where '+
  'Фамилия='+QuotedStr(Edit1.text)+' AND '+
  'Должность='+QuotedStr(Edit2.text)+' AND '+
  'телефон='+QuotedStr(Edit3.text);
 open;
end;

[_Тома_]

спасибо большое)

[Stilet]

Пожалуйста.