Показать сообщение отдельно
  #2  
Старый 11.06.2009, 06:36
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Считаем, что на форме есть 3 едита (Edit1,Edit2,Edit3).
Считаем, что на форме есть DBGrid1 который связан с AdoQuery1.
Считаем, что на форме есть кнопка (Button1) по нажатию которой отрабатывается запрос. Тогда событие этой кнопки будет таким:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
 AdoQuery1.Close;
 AdoQuery1.SQL.Text := 'select * from Journal where Field1=:Edit1 and Field2=:Edit2 and Field3=:Edit3';
 AdoQuery1.Parameters.ParamValues['Edit1'] := Edit1.Text;
 AdoQuery1.Parameters.ParamValues['Edit2'] := Edit2.Text;
 AdoQuery1.Parameters.ParamValues['Edit3'] := Edit3.Text;
 AdoQuery1.Open;
end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием