Лабораторная работа №7

Лабораторная работа №7

Цель работы: научиться создавать псевдонимы базы данных.

Ход работы:

1. Перед началом работы в своей папке создали папку ИС_лабораторная7. А внутри этой папки папку Data.

2. Скопировали в папку Data файлы: aleks.bmp, falkone.bmp, herm.bmp, isaak.bmp, rostr.bmp

1. Открыли утилиту BDE Administrator.

2. Создали новый псевдоним: Object – New.

3. В открывшемся диалоговом окне New Database Alias (Новый псевдоним базы данных) из списка Database Driver Name, в котором перечислены зарегистрированные в системе драйверы доступа к базам данных, выбрали драйвер для создаваемой базы данных, т.е. тип базы данных. Оставили драйвер Standard. Он предназначен для доступа к таблицам в формате Paradox. Щелкнули по кнопке ОК.

4. Заменили имя псевдонима – Peterburg.

5. Определили путь к файлам базы данных. Файлы мы будем размещать в папке Data. Щелкнули в строке Path и указали путь к папке Data.

1. Для регистрации созданного псевдонима в меню Object выбрали команду Apply.

2. Закрыли утилиту.

1. Открыли утилиту Database Desktop.

2. Выполнили команду File – New – Table. Согласились с выбором типа таблицы Paradox 7.

3. Описали поля таблицы:

1. Нажали кнопку Save as… и сохранили таблицу под именем Monuments в папке Data.

1. Внесли в таблицу записи:

Если при вводе данных в таблицу буквы русского алфавита отображаются неверно, то надо изменить шрифт, используемый для отображения данных. Для этого необходимо в меню Edit выбрать команду Preferences и в появившемся диалоговом окне, во вкладке General, щелкнуть по кнопке Change. В результате этих действий откроется диалоговое окно Change Font, в котором нужно выбрать русифицированный шрифт типа True Type. После этого надо завершить работу с Database Desktop, так как внесенные изменения будут действовать только после перезагрузки утилиты.

1. Открыли Delphi.

2. Подготовили форму см. Рисунок 1.

Подключили к проекту таблицу базы данных. Во вкладке BDE выберите компонент Table. Задали параметры:

Name – tabPeterburg

DataBaseName – Peterburg

TableName – Monuments.db

Active – True (файл таблицы открыт для работы)

Создали источник данных. Во вкладке Data Access компонент DataSource. Определили свойства источника данных:

Name – dsPeterburg

DateSet – tabPeterburg

Для отображения полей таблицы расположили на форме компоненты DBEdit, DBMemo, DBNavigator. Эти компоненты располагаются на вкладке DataSource. Для каждого компонента нужно определить источник данных (DataSource) и поле (DataField).

1. Написали процедуру ShowPhoto(Photo:string) загрузки изображения из файла с указанным в поле dbePhoto именем в компонент Image1.

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

3. Написали обработчик ввода данных в поле dbePhoto. Если нажата клавиша Enter, необходимо показать фотографию памятника.

4. Написали обработчик события OnClick по компоненту DBNavigator. Если нажата кнопка Insert, т.е. создается новая запись в базе данных, то картинка предыдущего памятника скрывается.

5. Сохранили проект в папке ИС_лабораторная7. Запустили приложение.

6. Ввели при помощи созданного приложения следующие записи в базу данных:

1. Показали выполненную работу преподавателю.

Вывод: проведя лабораторную работу, мы научились создавать псевдонимы базы данных.

5