Отступление 1. Модуль данных

Пока СУБД достаточно проста компоненты доступа к таблицам базы данных допустимо размещать непосредственно на главной форме. Но в дальнейшем вы будете усложнять приложение, будут появляться новые формы и новые компоненты доступа к базе данных, будет увеличиваться количество таблиц в базе данных, что будет усложнять работу. Разумно будет разместить все компоненты доступа к базе данных в одном месте – в Delphi для этих целей предназначена специальная форма: форма Модуля Данных. Эта форма не отображается во время работы приложения. Для создания такой формы следует пройти такой путь в меню: Файл / Новый / Модуль данных – у вас возникнет новая и пока пустая форма.

Заберите компоненты ADOConnection1, TableMagazin и DataSource1 с главной формы приложения и вставьте их в форму модуля данных.

Форма модуля данных по умолчанию имеет не очень удобное (длинное) имя – DataModule1. В дальнейшем мы будем обращаться к нему, поэтому давайте сразу переименуем этот компонент в DM – лаконично, удобно помнить и набирать.

Модуль сохраните (Файл / Сохранить как) в папке с базой данных (и с разрабатываемой программой) под именем UnitDM.pas.

Теперь следует обновить связь компонента DBGrid1 с таблицей базы данных, так как компонент посредник DataSource1 перекочевал на другую форму. Первое что нужно сделать – указать главной форме (модулю magazin) на существование формы DM (модуля UnitDM). Для чего кликните главную форму, далее нажмите меню Файл / Использовать модуль, в открывшемся списке укажите на UnitDM (если вы не сохраняли модуль UnitDM.pas то он не будет отображаться в списке) и нажмите OK. Далее в инспекторе объектов для компонента DBGrid1 в свойстве DataSource укажите в выпадающем списке DM.DataSource1.

Впоследствии все компоненты доступа к базе данных следует размещать на форме DM, а к вновь создаваемым формам подключать модуль UnitDM.

Проверьте работоспособность приложения. И в следующий раз при проектировании СУБД в Delphi сразу создавайте Модуль данных.