Альтернативный вариант - пожалуйста:
Код:
AdoQuery1.Sql.Text := 'select * from organized where Title like :Param1 and classroom like :Param2';
AdoQuery1.Parameters['Param1'].Values := Edit1.Text;
AdoQuery1.Parameters['Param2'].Values := Edit2.Text;
AdoQuery1.Open;