Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабы IT / ЛабаDelphi11.doc
Скачиваний:
90
Добавлен:
06.02.2015
Размер:
522.24 Кб
Скачать

2 Создание Базы Данных

На Delphiможно написать приложение, которое будет самостоятельно создавать базу данных. Но разработчикиDelphiпозаботились, чтобы создание БД было проще и разработали приложениеDatabase Desktopкоторое поставляется в комплекте сDelphi.

Вы можете запустить DatabaseDesktop:

либо из среды Delphi выбрав: Tools–> Database Desktop,

либо автономно не используя Delphi:

Пуск–>Программы–>Borland Delphi7–>Database Desktop.

Задание 2.1. Создадим Псевдоним для Базы Данных «Сотрудники» используя приложение Database Desktop.

С самого начала определим место, где будут храниться файлы вашей БД. Создайте на жестком диске папку с путем D:\Database\Sotrudink.

Закройте Delphi. Запустите Database Desktop. Выберете Tools –> Alias Manager (рис. )

Далее для создания нового псевдонима (Алиаса) щелкните Newи в поле «DatabaseAlias» напишитеSotrudink.

Затем щелкните кнопку «KeepNew».

Теперь нужно поставить в соответствие ваш псевдоним Sotrudinkи файлы БД которые будут находиться в каталогеD:\Database\Sotrudink.

Используя кнопку BrowseнастройтеPathна каталогD:\Database\Sotrudink. У Вас должно получиться следующее:

Рис. 11ПриложениеDatabaseDesktopрегистрирует псевдонимSotrudink

Затем сохраните данные настройки нажав SaveAs.

Рис. 12Сохраняем псевдоним в файле конфигурацииIDAPI32.CFG

Нажмите сохранить.

Затем на вопрос сохранить ли файл IDAPI32.CFGответьте ДА.

Теперь нажмите OK.

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

Задание 2.2. Непосредственно создадим Базу Данных «Сотрудники» на основе уже создзанного для неё псевдонима Sotrudink используя приложение Database Desktop.

Здесь же в DatabaseDesktopсоздадим файлы БД для отображения их в табличном виде. Для этого выберетеFile–>New–>Table. Из раскрывающегося списка форматов БД выберетеParadox7 и нажмитеOK.

Затем определите поля Name,Surname,Age,Growth,ProfessionиWeightс конкретным типом и размером элемента поля. Также двойным щелчком поставьте звездочку в областиKeyдля поляName. Таким образом мы индексируем первое полеName(делаем его ключевым).

Рис. 13Структура таблицы БД вDatabaseDesktop. ЗдесьType:l– означает длинное целое,A– текстовый формат и т.д.Size– означает размер в байтах элемента данного поля.Key– индексирует поле.

Теперь нажмите SaveAs. Выберите в полеAliasпсевдонимSotrudink, а в поле имени файла введитеsotrudnikи щелкните на кнопке Сохранить.

Рис. 14Сохраняем таблицу с именемsotrudnikбазы данных с псевдонимомSotrudnik

Теперь в папке D:\Database\Sotrudinkпоявился файл БДsotrudink.db. Можете это проверить.

Далее непосредственно будем вносить данные в эту БД.

Выберите File–>Open–>Tableлибо просто щелкните на пиктограммеOpenTable.

Затем аналогично предыдущим действиям выберите в поле AliasпсевдонимSotrudink, а в поле имени файла введитеsotrudnikи щелкните на кнопке Открыть.

Рис. 15Открываем файл–таблицу БД для ввода туда информации

Перед вами откроется сама БД «Sotrudnik» в виде таблицы с полями которые вы уже определили ранее. Теперь щёлкните крайнюю кнопку справа или нажмитеF9 таким образом Вы перейдёте в режим редактирования БД.

Внесите Данные в таблицу, она должна выглядеть так.

Рис. 16Вводим информацию в файл–таблицу

Вот и всё. Теперь База данных готова и её можно обрабатывать приложением созданным в Delphi.

Закройте DatabaseDesktop.

Соседние файлы в папке Лабы IT