Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ЛР_РиЭУБД.doc
Скачиваний:
2
Добавлен:
01.05.2025
Размер:
4.09 Mб
Скачать

Теоретическая часть

Изучите теоретический материал, загрузив из папки «Учебная» файл «BDE-заимствование.pps».

Практическая часть

Ход работы

  1. Создайте в своей папке на сетевом диске или на жестком диске Student папку с названием «РиЭУБД», а в ней папку «ЛР_1».

Для создания простейшего приложения BDE необходимо:

А) создать каталог (шаг 1) – папку для файлов базы данных;

Б) создать псевдоним – имя, поставленное в соответствие реальному, полному имени каталога базы данных, с помощью утилиты, поставляемой совместно с Delphi 7, BDE Administrator;

В) создать таблицу БД с помощью утилиты Database Desktop

Создадим псевдоним для первой лабораторной работы. Для этого:

  1. З апустите утилиту BDE Administrator: Пуск → Все программы → Borland Delphi 7 → BDE Administrator либо найдите на рабочем столе ярлык для утилиты . Откроется окно программы (Рис.1.1).

  2. В левой части окна, на вкладке Databases, перечислены псевдонимы, зарегистрированные на данном компьютере. Для создания нового псевдонима выберите из меню Object команду New.

  3. В открывшемся диалоговом окне New Database Alias (Новый псевдоним базы данных) из списка Database Driver Name (Имя драйвера базы данных), в котором перечислены зарегистрированные в системе драйверы доступа к базам данных, нужно выбрать драйвер для создаваемой базы данных (Рис.1.2), т.е. выбрать тип создаваемой базы данных.

П ри создании псевдонима по умолчанию предлагается драйвер STANDARD (default driver), который обеспечивает доступ к таблицам в формате Paradox.

  1. Нажмите OK, после чего откроется окно, как на Рис.1.3.

  2. П ереименуйте заданное по умолчанию имя нового псевдонима STANDARD1, например, PRIMER1. Имя псевдонима можно изменить обычным для Windows способом: щелкнуть правой клавишей мыши на имени псевдонима и в появившемся контекстном меню выбрать команду Rename (Переименовать).

  3. В правой части окна в пункте PATH укажите путь к файлам базы данных, для которой создается псевдоним (в нашем случае это папка ЛР_1).

  4. Для того, чтобы созданный псевдоним был зарегистрирован в файле конфигурации (Idapi.cfg), выберите в меню Object команду Apply (Применить).

  5. В открывшемся диалоговом окне Confirm (Рис.1.4) подтвердите необходимость сохранения изменений, нажав на кнопку OK.

Т еперь, после создания псевдонима, можно приступить к следующему этапу - созданию таблицы базы данных с помощью утилиты Database Desktop. Утилита Database Desktop позволяет выполнять все необходимые при работе с базами данных действия. Она обеспечивает создание, просмотр и модификацию таблиц баз данных различных форматов (Paradox, dBASE, Microsoft Access). Кроме того, утилита позволяет выполнять выборку информации путем создания запросов.

  1. Запустите утилиту Database Desktop: Пуск → Все программы → Borland Delphi 7 → Database Desktop либо найдите на рабочем столе ярлык для утилиты . Откроется окно программы.

  2. Д ля создания новой таблицы базы данных выберите из меню File команду New Table (Рис.1.5).

  3. В открывшемся диалоговом окне Create Table (Рис.1.6) выберите тип создаваемой таблицы (значением по умолчанию является тип Paradox 7). Оставляем тип по умолчанию.

  4. В результате открывается диалоговое окно Create Paradox 7 Table (Рис.1.7), в котором можно определить структуру записей таблицы.

Д ля каждого поля таблицы необходимо задать имя, тип и, если нужно, размер поля. Имя поля используется для доступа к данным. В качестве имени поля, которое вводится в колонку Field Name, можно использовать последовательность из букв латинского алфавита и цифр, длиной не более 255 символов.

Более подробно типы данных, задание имения поля и создание своей собственной структуры таблицы рассмотрены в Лабораторной работе 2. Сейчас рассмотрим процесс создания таблицы на основе заимствованной структуры таблицы.

  1. Нажмите на кнопку Borrow (Взаймы) внизу таблицы.

  2. Совместно с Delphi 7 поставляется большое количество примеров для приложений, в том числе и приложений БД. Файлы таблиц для этих приложений находятся в каталоге C:\Program Files\Common Files\Borland Shared\Data. Выберите в окне Select Borrow Table любую таблицу для своего приложения (в качестве примера выбрана таблица Country.db) (Рис.1.8).

  3. При нажатии на кнопку Открыть из выбранной таблицы в новую таблицу копируются описания полей и таблица отображается на окне (Рис.1.9). Впоследствии выбранную структуру можно настраивать, изменяя, добавляя или удаляя отдельные элементы.

  4. После определения структуры таблицы ее необходимо сохранить, нажав кнопку Save as и указав расположение таблицы на диске и ее имя. Сохраните выбранную структуру в папку «ЛР_1» либо под ее именем (Country.db), либо задав ей свое имя.

  5. Закройте утилиту Database Desktop. Теперь приступим к созданию самого приложения.

  6. Запустите программу Delphi 7.

  7. П ереименуйте форму, назвав ее «Страны» (если Вы выбрали как пример БД таблицу «Country.db»).

  8. Разместите на форме компоненты:

  • Table (вкладка BDE):

  • DataSource (вкладка Data Access):

  • DBGrid (вкладка (Data Controls):

  • DBNavigator (вкладка Data Controls)

примерно так, как на Рис.1.10.

  1. Установите свойства компонента согласно Таблице 1.1.

Таблица 1.1 Свойства компонентов приложения

Компонент

Свойство

Значение

Form1

Caption

Страны

Color

По своему желанию

Autosize

True

Table1

DatabaseName

PRIMER1

TableName

Country.db (или имя вашей таблицы)

Active

True

DataSource1

DataSet

Table1

DBGrid1

DataSource

DataSource1

DBNavigator1

DataSource

DataSource1

П осле установки указанных свойств внешний вид проектируемой формы приведен на Рис.1.11.

  1. Запустите приложение на выполнение (F9).

  2. Если в таблице нет никаких записей (так может быть из-за того, что мы копировали только структуру таблицы, а не находящиеся в ней данные), то скопируйте выбранную Вами таблицу из каталога C:\Program Files\Common Files\Borland Shared\Data в Вашу папку «ЛР_1», а затем перезапустите приложение.

  3. Поэкспериментируйте с записями таблицы, попробовав удалить или добавить записи.

  4. Сохраните приложение в папке «ЛР_1».

  5. Выйдите из среды Delphi 7.

  6. Проверьте работоспособность созданного приложения, запустив на выполнение exe-файл.