[listerine]

Сообщение от Freeman

Хороший стиль программирования подразумевает отсутствие задачи "программно кликнуть куда-либо". Код, выполняющий необходимые действия, выносится в процедуру, которая вызывается из обработчика и из других мест, -- где нужно.

Конкретно в этом коде смущает приведение экземпляра TDBGrid к TStringGrid, наверняка из-за отсутствия в TDBGrid свойства Row. А зачем, спрашивается? Это и есть быдлокод. Наличие визуальных компонентов не отменяет обычного, невизуального ООП.

Я слегка в шоке элементарного перед носом не замечал. Спасибо Freeman что открыли глаза. Избавился от задачи "программно кликнуть куда-либо". Все заработало. Спасибо всем за помощь.