Создание клиентского Delphi-приложения для обращения к базе данных


Для разработки клиентского программного обеспечения необходимо убедится, что сервер FireBird запущен. Отладку создаваемого приложения рекомендуется проводить на локальном сервере. Итак, запускаем Delphi 6. В нижней панели инструментов обращаем внимание на крайнюю левую кнопку - View Unit (Ctrl+F 12), и следующую за ней - View Fon (Shift+F12). Эти кнопки позволяют открыть соответственно список модулей и список форм проекта. В окне дерева объектов (Object TreeView) отображается структура активного (выбранного) объекта. В окне инспектора объектов (Object Inspector) отображаются свойства и события активного объекта. Если этих окон нет на экране, их можно добавить, например: меню View Object Inspector.

Предположим необходимо создать модуль данных (DataModuIe). Для этого выберем пункт File/New и в появившемся окне выберем объект DataModule. На появившееся окно установим рабочие невизуальные компоненты TIBDatabase, TIBTransaction, TIBQuery (вкладка InterBase). Переименуем их чтобы сократить время набора их имен и сделать код более читаемым. Для этого в инспекторе объектов присвоим новое значение свойству Name компонентов.

Выделим компонент IBDatabasel (щелчок мышью). В инспекторе объектов введем в свойство Name выделенного компонента новое имя DataBase.

Компонент IBTransactionl переименуем в trans.

Первый набор данных IBQueryl будет использоваться как главный для таблицы Otd (переименуем в qomain), второй - как главный для таблицы Slug Otd (переименуем в qso main), третий - как вспомогательный для обеих таблиц (переименуем в q_tmp).

Сохраним проект (File Save Project As...). В ходе диалога будет предложено сохранить два модуля (Unitl и Unit2) и проект (Projectl). Проекту желательно присвоить смысловое имя.

Также необходимо связать эти компоненты и подсоединить их к базе данных.

Компонент DataBase. Введем в свойстве DataBaseName компонента DataBase полный путь к базе данных.

Свойство Connected по умолчанию установлено в False. (Впоследствии для подсоединения к базе данных необходимо будет установить свойство Connected в True).

Компонент Trans, В компоненте Trans установить свойство DefaultDataBase в DataBase.

Компоненты Query. Для компонентов qo main и qso main, q_tmp свойство DataBase в значение DataBase.

Введем в свойство SQL объекта qo_main запрос, на основе которого будут выбираться данные из таблицы Otd.


Только материалы из рубрики ТИЦ свободны для копирования без каких-либо условий. Ссылка на остальные материалы обязательна.