Доступ через ODBC из Delpi7

В создаваемом клиентском приложении необходимо связать с созданным источником данных объекты доступа и объекты отражения. Например, программируя в среде Delphi, вы можете найти на вкладке DataAccess элемент управления DataSource На вкладке DataControl объекты отражения данных из внешних источников. Это – специализированные элементы управления: DBGrid, DBNavigator, DBCombobox и т.п. Их можно поместить на форму. Разберем последовательность необходимых действий.

Итак, создайте новый проект с формой. В этой форме нам надо показать какую-нибудь таблицу из одной базы данных. Сначала надо установить связь с базой данных. Это делается в два этапа. Сначала следует полностью определить, где берутся данные, а затем - как они отображаются. Где брать данные тоже задается в два этапа: сначала на форму помещается элемент управления «таблица», а затем элемент управления «источник данных». Итак, поместите на форму элемент управления Table (DBTable) - таблица базы данных. Этот элемент управления вы найдете во вкладке BDE. Сообщите, что вы связываетесь с таблицей через ODBC - соединение. Для этого в свойствах укажите DataBaseName, то есть выберите имя заданного вами ранее ODBC - соединения. А затем найдите в свойствах TableName и задайте это свойство. Если вы установили верно соединение, то при высвечивании доступных значений для DataBaseName вы обязательно увидите имя вашего соединения. А после его задания в списке имен таблиц при задании TableName вы увидите имена всех таблиц и запросов вашей базы данных. Это еще не все. Рекомендуется дать осмысленное имя вашему элементу управления (а не Table1). Не используйте русские буквы при этом.

Теперь надо задать источник данных для объектов отображения. Для этого во вкладке DataAccess найдите элемент управления DataSource и тоже поместите его на форму. Свяжите его с элементом управления «таблица», задав свойство DataSet. Измените имя элемента управления на некоторое осмысленное.

Для показа строк таблицы следует выбрать элемент управления DBGrid. Его вы найдете во вкладке DataControls. Свяжите этот элемент управления с источником данных (свойство DataSource), дайте ему хорошее имя. Проверьте, все ли правильно связалось. Для этого свойству Active в таблице (Table) задайте значение True. Если все хорошо, вы сразу увидите в Grid строки вашей таблицы. Затем лучше вернуть прежнее значение этого свойства, т.е. False.

Запустите программу. Что вы видите? Свойство Active таблицы делало видимыми строки таблицы. Программным путем лучше всего не прямо изменять это свойство, а выполнить метод Open таблицы. Очевидно, в нашем случае открытие таблицы надо сделать при показе формы, то есть при обработке события OnActivate формы. Напишите этот текст. При закрытии формы закрывайте таблицу.

Возможно, вам покажется удобным расположить под Grid панель стандартных элементов управления с кнопочками «вперед», «назад», «в начало» и т.п. Найдите соответствующий элемент управления DBNavigator во вкладке DataControls, приклейте его к нижнему краю своей формы. Свяжите этот элемент управления с вашим источником данных, т.е. укажите свойство DataSource. Проверьте работу. Попробуйте добавлять и удалять строки, посмотрите на результат в Access.

Дата добавления: 2014-01-04