Использую TADODataSet для доступа к MS SQL 2000 пытаюсь построить перестраиваемые источники данных
когда пишу

Data2.Close;
Data1.Close;
Data2.CommandText:=Query;
Data2.DataSource:=FindComponent( MasterSour ) as TDataSource;
Data2.Open;
Data1.Open;

Data2 - возвращает пустой набор данных

Data2.Close;
Data1.Close;
Data2.CommandText:=Query;
Data2.DataSource:=FindComponent( MasterSour ) as TDataSource;
Data1.Open;
Data2.Open;

При первом вызове все нормально? при втором вызыве возрвращает ошибку Что Data1 не содержит поля NameField которого там действительно нет так как Data1 перестроен, но это поле содержалось в предыдущем запросе

решается это

Data2.Close;
Data1.Close;
Data2.CommandText:=Query;
Data2.DataSource:=FindComponent( MasterSour ) as TDataSource;
Data2.Open;
Data1.Open;
Data2.Close;
Data2.Open;

Где он запоминает это поле?
Как это сделать не таким извращенным способом?