Задание8_Работа_с_БД (1076759), страница 4

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 4)

Таблица 8. Значения свойств компонента DataSource
Свойство Значение

N ame DataSource1

DataSet Table1

4.2. Просмотр базы данных

Пользователь может просматривать базу данных в режиме формы или в режиме таблицы. В режиме формы можно видеть только одну запись, а в режиме таблицы — несколько записей одновременно. Довольно часто эти два режима комбинируют. Краткая информация (содержимое неко­торых ключевых полей) выводится в табличной форме, а при необходимости видеть содержимое всех полей записи выполняется переключение в режим формы.

Компоненты, обеспечивающие просмотр и редактирование содержимого полей базы данных, находятся на вкладке Data Controls (рис. 15).

Рис. 15. Компоненты просмотра и редактирования полей базы данных

4.2.1. Режим формы

Для того чтобы обеспечить просмотр базы данных в режиме формы, в фор­му приложения нужно добавить компоненты, обеспечивающие просмотр и, если нужно, редактирование содержимого полей записи, причем по одному компоненту для каждого поля.

Компонент DBText позволяет только просматривать содержимое поля, а компоненты DBEdit и DBMemo — просматривать и редактировать. В табл. 9 перечислены некоторые свойства этих компонентов. Свойства перечислены в том порядке, в котором следует устанавливать их значения после добавления в форму приложения.

Таблица .9. Свойства компонентов DBText, DBEdit и DBMemo
Свойство Определяет

N ame Имя компонента. Используется для доступа к свойствам компонента

DataSource Компонент-источник данных

DataField Поле базы данных, для отображения или редактирования которого используется компонент

В качестве примера использования компонентов DBEdit и DBMemo рассмот­рим программу, которая обеспечивает работу с базой данных "Архитектур­ные памятники Санкт-Петербурга". Вид формы приложения приведен на рис. 16.

Рис. 16. Форма приложения Архитектурные памятники Санкт-Петербурга

Создается форма следующим образом. Сначала в пустую форму надо доба­вить компоненты Table и DataSource и установить значения их свойств (табл. 10). Значения свойств следует устанавливать в том порядке, в ко­тором они следуют в таблице.

Таблица 10. Значения свойств компонентовTablel и DataSourcel

Свойство Значение Комментарий

Table1. DatabaseName Peterburg Псевдоним базы данных (создается утилитой BDE

Administrator)

Table1 .TableName monuments.db Таблица базы данных (создается утилитой Database

Desktop)

Tablel.Active True

DataSourcel.Dataset Table1

После настройки компонентов Table и DataSource в форму нужно добавить три компонента DBEdit и компонент DBMemo. Компоненты DBEdit предна­значены для просмотра и редактирования полей Name, Architect и Photo, компонент DBMemo — для просмотра и редактирования поля Note. Значения свойств компонентов просмотра-редактирования полей базы данных приве­дены в табл. 11.

Таблица 11. Значения свойств компонентов DBEdit1- DBEdit3 и DBMemo1

С войство Компонент

DBEdit1 DBEdit2 DBEdit3 DBMemo1

DataSource DataSource1 DataSource1 DataSource1 DataSource1

DataField Monument Architect Photo Note

Так как значению свойства Active компонента Table1 присвоено значение True, то сразу после того, как будет присвоено значение свойству DataField, в поле компонента DBEdit появится содержимое соответствую­щего поля первой записи таблицы базы данных. Если таблица не содержит данных, поле остается незаполненным. Если значение свойства Active компонента Table1 равно False, то в поле компонента DBEdit появляется его имя, значение свойства Name.

Кроме компонентов просмотра-редактирования полей базы данных, в фор­му нужно добавить компонент Image, который используется для просмотра иллюстраций, и четыре компонента Label для вывода пояснительного тек­ста. Свойству Visible компонентов Image1, Label4 и DBEdit3 следует присвоить значение False.

Теперь, если откомпилировать и запустить программу, на экране появится форма, в полях которой будет находиться содержимое первой записи файла данных.

Рис.18. Компонент DBNavigator

Для того чтобы иметь возможность просматривать другие записи файла данных, в форму приложения нужно добавить компонент DBNavigator, зна­чок которого находится на вкладке Data Controls (рис. 17). Компонент DBNavigator (рис. 18) представляет собой набор кнопок, при щелчках на которых во время работы программы происходит перемещение указателя текущей записи к следующей, предыдущей, первой или последней записи базы данных, а также добавление к файлу данных новой записи, удаление текущей записи.

Рис. 17. Значок компонента DBNavigator находится на вкладке Data Controls

Табл. 17.12 содержит описания действий, которые выполняются в результате щелчка на

соответствующей кнопке компонента DBNavigator.

Свойства компонента DBNavigator перечислены в табл. 13.

Таблица 12. Кнопки компонента DBNavigator

Кнопка Обозначение Действие

К первой nbFirst Указатель текущей записи перемещается к первой записи файла

дан­ных

К предыдущей nbPrior Указатель текущей записи переме­щается к предыдущей записи

файла данных

К следующей nbNext Указатель текущей записи перемещается к следующей записи

файла данных

К последней nbLast Указатель текущей записи перемещается к последней записи

файла данных

Добавить nblnsert В файл данных добавляется новая

запись

Удалить nbDelete Удаляется текущая запись файла данных

Редактирование nbEdit Устанавливает режим редактирова­ния текущей записи

Сохранить nbPost Изменения, внесенные в текущую запись, записываются в файл

данных

Отменить Cancel Отменяет внесенные в текущую запись изменения

Обновить nbRefresh Записывает внесенные изменения в файл

Таблица 13. Свойства компонента DBNavigator

Свойство Определяет

N ame Имя компонента. Используется для доступа к свойствам компонента

DataSource Имя компонента, являющегося источником данных. В качестве источника данных

может выступать база данных (ком­понент Database), таблица (компонент Table) или

резуль­тат выполнения запроса (компонент Query)

VisibleButtons Видимые командные кнопки

Следует обратить внимание на свойство VisibleButtons. Оно позволяет скрыть некоторые кнопки компонента DBNavigator и тем самым запретить выполнение соответствующих операций над файлом данных. Запретите удаление записей, присвоив значение False СВОЙСТВУ VisibleButtons.nbDelete.

На рис. 19 приведен вид формы приложения Архитектурные памятники Санкт-Петербурга после добавления компонента DBNavigator. Свойству DataSource компонента DBNavigator1 следует присвоить значение DataSource1 (компонент DataSource1 связан с Table1).

Рис. 19. Окончательный вид формы приложения Архитектурные памятники Санкт-Петербурга

В принципе, после добавления в форму компонента DBNavigator простей­шая программа управления базой данных готова. Эта программа обеспечи­вает просмотр, редактирование, добавление новых и удаление ненужных записей.

Теперь рассмотрим, что надо сделать, чтобы во время просмотра в поле Image1 автоматически появлялись фото­графии памятников, а компоненты DBEdit3 и Label4 были бы не видны, а во время добавления информации в базу данных пользователь мог бы вводить в поле photo имя файла фотографии.

Такой алгоритм работы с фотографиями можно реализовать следующим образом. При просмотре базы данных поле имени файла иллюстрации (DBEdit3) и его заголовок (Label4) на форме не отображаются. Если пользователь на­жимает одну из кнопок компонента DBNavigator, то как результат обработ­ки события OnClick вызывается процедура TForml.DBNavigatorlClick, которая, если были нажаты кнопки Добавить или Редактировать, делает видимым поле DBEdit3, тем самым позволяя пользователю ввести или изменить имя файла иллюстрации.

Разрабаты­ваемое приложение предполагает, что изображения (фотографии) архитек­турных памятников находятся в подкаталоге Data каталога, в котором размещена програм­ма работы с базой данных. Имя этого каталога можно определить во время работы программы путем обращения к функциям Paramstr(0) и ExtractFilePatch. Значение первой — полное имя выполняемого файла программы, второй — путь к этому файлу (удаляет имя файла из Paramstr(0)). Это уместно сделать при активации таблицы (процедура Table1BeforeOpen).

В листинге 1 приведен текст модуля программы Архитектурные памятни­ки Санкт-Петербурга.

Характеристики

Список файлов лабораторной работы