а может вот по этому примеру, что Вы мне написали:
Код:
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Text := 'Select* from Исполнители where [Дисциплина №1] LIKE:Value1 and [Дисциплина №2] LIKE:Value2 and [Дисциплина №3] LIKE:Value3';
DataModule2.ADOQuery1.Parameters.ParamValues['Value1'] := Edit1.Text;
DataModule2.ADOQuery1.Parameters.ParamValues['Value2'] := Edit1.Text;
DataModule2.ADOQuery1.Parameters.ParamValues['Value3'] := Edit1.Text;
DataModule2.ADOQuery1.Open;
Form4.ShowModal;
end;
программа находит эти данные просто вывод их не правильный? по этому я и вижу пустое окно?