ADOQuery3,4,5 - эти компоненты у вас отображают таблицы через SELECT, но когда вы заменяете SELECT на UPDATE, то естественно таблицы пропадают, обновляйте компонентом ADOCommand из вкладки ADO:
Код:
ADOCommand1.CommandText := 'UPDATE таблица1 SET поле=значение WHERE поле=значение';
ADOCommand1.Execute;
ADOCommand1.CommandText := 'UPDATE таблица2 SET поле=значение WHERE поле=значение';
ADOCommand1.Execute;
// и т.д.