После SELECT через IBDataSet ошибка EIBClientError 'Not in edit mode'

[DiMoN2002]

Доброго времени суток.

Проблема состоит в следующем:
Имеется таблица из которой по запросу через IBDataSet выводятся записи.
Вот код:
void __fastcall TForm2::DBComboBox1Change(TObject *Sender)

{
String query;
query="select * from KURORTI where HOTEL like '%"+DBComboBox1->Text+"%'";
IBDataSet1->SelectSQL->Add(query);
IBDataSet1->Open();
DataSource1->DataSet=IBDataSet1;
}

Запрос отрабатывает нормально. Информация выводится в DBGridEh в котором DataSource=DataSource1.
Но после этого при нажатии на любой элемент формы выходит сообщение об ошибке: "EIBClientError 'Not in edit mode'". А если опять в DBComboBox1 выбирать какой либо вариант, то вообще ничего не происходит.
В чем может быть проблема? Я же вроде запрос даю не на редактирование а на SELECT. В таблице ничего не изменяется. Других обработок событий на Set или Grid нет.Подскажите пожалуйста.