[Kapitoshka438]

Ваш запрос не должен работать со строковыми данными, т.к. Вы забыли про кавычки. Здесь нужно воспользоваться параметрами:

Код:

  ADODataSet1.Close;
  ADODataSet1.CommandText := 'Select * From ' + ComboBox5.Text + ' Where ' + ComboBox1.Text + ' = :A';
  ADODataSet.Parameters.ParamValues['A'] := Edit99.Text;
  ADODataSet1.Open;