Проблемы пр иобновлении DBGrid

[Akunin88]

Здравствуйте. Вопрос следующий:
Есть СУБД недоделанная. Организация: TADOConnection -->TADOTable-->TDataSourse<->DBGrid
2 таблицы с 2 датасорсами -'пользователи' и 'Их устройства записи'.Связь между ними реализована по полю UserID(ключевое поле таблицы 'Пользователей')
На Форме в первой DBGRid отображение таблицы 'пользователей', во второй, соотвественно, отображение таблицы 'устройств', только тех,
которые принадлежат данному пользователю(при переходе по привязанному навигатору к DBGrid 'Пользователей'). код такой

dm.adoUsers.Active:=true; //есть доступ к 1 таблице
dm.adoUsers.Refresh; //обновление 1 таблицы-если в него были занесены изменения
dbGridM.DataSource:=dm.dsUsers;
dbGridM.Columns.RebuildColumns;
gridColumnUsers(dbGridM); //перестройка размеров 1 таблицы
dbGridM.Visible:=true; //видно 1 таблицу

//отображение устройств у выбранного пользователя
dm.adoShowDevices.MasterSource:=dm. dsUsers;
dm.adoShowDevices.MasterFields:='Us erID';
dm.adoShowDevices.Active:=true; //есть доступ ко 2 таблице
dm.adoShowDevices.Refresh; //обновление 2 таблицы-если в нее были занесены изменения
dbGridDev.Columns.RebuildColumns;
dbGridDev.DataSource:=dm.dsShowDevi ces;
dbGridDev.Columns.RebuildColumns;
gridColumnDevices(dbGridDev); //перестройка размеров 2 таблицы под пользователей
dbGridDev.Visible:=true; //видно 2 таблицу

dbnavigator1.DataSource:=dm.dsUsers ; //навигатор подцеплен к таблице Users

на другой форме в программе есть возможность добавления в базу 'устройств'+привязка к пользователю(по полю UserID). НО(!) при этом почему-то в DBGrid
(в котором отображаются носители у данного пользователя) не происходит обновление. Хотя в базу все данные нормально пишет!
dbGridDev.Refresh не работает, все adoTable-ы Active:=true;
также пробовал dm.adoShowDevices.MasterSource.Refr esh...
при новом запуске программы-все нормально отображается...
Помогите, пожалуйта. Только начал учиться работать на Delphi

[Прик]

После записи данных в базу:

  dm.adoShowDevices.Close;
  dm.adoShowDevices.Open;

Refresh здесь не помощник.

P.S. Не мешало бы объявлять о какой СУБДЕ речь.