Материал: Создание приложений баз данных в среде Delphi

Создание приложений баз данных в среде Delphi

Министерство образования Республики Беларусь

Учреждение образования «Гомельский государственный университет имени Франциска Скорины»

Факультет математический

Кафедра вычислительной математики и программирования

Курсовая работа

ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ

РЕФЕРАТ

Курсовая работа

Ключевые слова: утилита DatabaseDesktop, алиас БД, таблица БД, утилита BDE Administrator, методы навигации, методы Locate и LookUp, вычисляемые поля, SQL-запросы, компоненты TTable и TQuery, генератор отчетов Rave .

Объект исследования: среда Delphi.

Предмет исследования: приложения баз данных в Delphi.

Цель курсовой работы: изучение основных принципов создание приложений баз данных в среде Delphi, разработка таблиц БД и создание приложения БД в соответствии с заданной прикладной областью.

Задачами курсовой работы являются: изучение основных принципов создание приложений баз данных в среде Delphi, создание таблиц БД с помощью утилиты DatabaseDesktop, создание псевдонима (алиаса) БД с помощью утилит SQL Explorer или BDE Administrator, разработка интерфейса приложения БД, организация поиска и фильтрации в БД, создание вычисляемых полей, сортировка данных в таблицах БД, построение SQL-запросов к БД, генерация отчетов в RaveDesigner.

Введение

База данных - множество файлов, предназначенных для хранения информации о некоторой предметной области. Степень детализации информации определяется рядом факторов. Прежде всего, целью использования информации из баз данных и сложность информационных процессов, существующих в пределах предметной области в конкретных условиях. С другой стороны, база данных - это двумерный массив, где строки образуются отдельными записями, а столбцы - полями этой записи. Ядром любой базы данных является модель данных. Модель данных - это совокупность структур данных и операций их обработки. Модель базы данных, состоящая из таблицы, между отдельными из которых существуют связи, называется реляционной. Существуют и другие работы баз данных, некоторые из которых значительно эффективнее реляционной, но не получили широкого распространения из-за сложности создания соответствующих систем управления базами данных: иерархическая (данные организованы в виде деревьев), сетевая (каждый узел БД взаимодействует с другими узлами посредством сложной системы связей) и объектная (в БД хранятся не только данные, но и методы их обработки в виде программного кода).

В курсовой работе рассматривается создание приложений баз данных в среде Delphi. Для этого были изучены некоторые теоретические вопросы: утилита DatabaseDesktop, компонент Query, компонент DBGrid, компонент DBNavigatorи другое. В утилите DatabaseDesktop были созданы таблицы Услуги, Персонал, Договора и Клиенты для предметной области Рыболовное хозяйство. Было создано приложение БД в среде Delphi, реализующее навигацию по таблицам БД, сортировку данных по основному и дополнительным индексам, поиск данных, отбор данных с помощью фильтров компонентов Tableи Query, фильтрацию в наборе данных.

1. Изученные теоретические вопросы

.1       Компоненты для работы с базой данных

)        Компонент TDBCheckBox. Он обладает функциональностью стандартного флажка TCheckBox, но источником данных и приёмником для него служит поле НД, которое может быть логическим или символьным. В последнем случае необходимо соответствующим образом установить значение текстовых свойств ValueChecked и ValueUnChecked. Элементы в этих свойствах перечисляются через точку с запятой.

)        Компонент TDBEdit. Он позволяет редактировать значение отдельного поля текущей записи НД. Используемые свойства не отличаются от свойств компонента TEdit, но источником данных и их приёмником для него служит поле НД. При вводе значения в компонент TDBEdit программа автоматически следит за тем, чтобы оно было совместимо по формату с полем НД. Ввод неверных значений блокируется.

)        Компонент TDBImage. Он позволяет воспроизводить на экране рисунки, хранящиеся в базе данных. Рисунки отображаются в данном поле автоматически, если значение свойства AutoDisplay = True. Иначе рисунок можно загрузить вызовом метода LoadPicture. Изображение можно скопировать, используя метод Picture.

Если значение свойства QuickDraw = True, то ускоряется вывод рисунка на экран, что часто полезно при активном просмотре больших наборов записей, но при этом ухудшается качество изображения. Свойство Stretch позволяет подстраивать (сжимать или растягивать) изображение под текущие размеры компонента TDBImage на форме.

)        Компонент TDBListBox. Он предназначен для отображения состояния конкретного поля текущей записи НД, а также для выбора нового значения поля. Список этого компонента первоначально пуст, и программист должен заполнить список перед тем, как он станет доступен пользователю.

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

)        Компонент TDBComboBox. Он позволяет показывать и изменять текущее значение поля в раскрывающемся списке значений. Набор текста в области ввода позволяет быстро переместиться к нужной записи в списке или ввести значение, отсутствующее в нем.

.2 Особенности набора данных Table

Компонент Table представляет собой набор данных, который в текущий момент времени может быть связан только с одной таблицей БД. Этот набор данных формируется на базе навигационного способа доступа к данный, поэтому компонент Table рекомендуется использовать для локальных БД, таких как dBase или Paradox. При работе с удаленными БД следует использовать компонент Query.

Связь между таблицей и компонентом Table устанавливается через его свойство TableName типа TFileName, которое задает имя таблицы (и имя файла с данными таблицы). При задании свойства TableName указывается имя файла и расширение имени файла.

На этапе разработки приложения имена всех таблиц доступны в раскрывающемся списке Инспектора объектов. В этот список попадают таблицы, файлы которых расположены в каталоге, указанном свойством DatabaseName. При смене имени таблицы на этапе проектирования приложения свойству Active набора данных автоматически устанавливается значение False. При задании имени таблицы программным способом набор данных предварительно необходимо закрыть, установив его свойству Active значение False. В противном случае генерируется исключительная ситуация. Свойство TаbleТуре типа ttTableType определяет тип таблицы. Для локальных таблиц это свойство может принимать следующие значения:

.ttoefault - тип таблицы автоматически определяется по расширению файла;

2. ttParadox - таблица Paradox;

. ttDBase - таблицаdBASE;

4. ttFoxPro - таблица FoxPro;

. ttASCII - текстовый файл, содержащий данные в табличном виде (таблица ASCII).

По умолчанию в состав набора данных Table попадают все записи связанной с ним таблицы. Для отбора записей, удовлетворяющих определенным условиям, используются фильтры.через BDE автоматически поддерживает многопользовательский доступ к локальным таблицам, при этом по умолчанию все пользовательские приложения имеют равные права и могут редактировать содержащиеся в таблицах данные. Чтобы запретить пользователям изменять содержание записей, можно использовать свойство Readonly типа Boolean. По умолчанию оно имеет значение False, что предоставляет пользователю право на модификацию записей.

В наборе данных Table возможно указание текущего индекса, требуемого для выполнения операций: сортировки записей, поиска записей, установки связей между таблицами.

Текущий индекс устанавливается с помощью свойства IndexName или IndexFieldNames типа String. На этапе разработки приложения текущий индекс выбирается из списка индексов, заданных при создании таблицы. Все возможные значения свойств IndexName и IndexFieldNames содержатся в раскрывающихся списках, доступных через Инспектор объектов. Оба свойства во многом схожи, и их использование практически одинаково. Значением свойства IndexName является имя индекса, заданное при создании таблицы, а значением свойства IndexFieldNames является имя поля, для которого был создан индекс. Если индекс состоит из нескольких полей, то для свойства IndexName по-прежнему задается имя этого индекса, а для свойства IndexFieldNames через точку с запятой перечисляются имена полей, входящие в этот индекс.

Для таблиц Paradox сделать текущим индексом ключ (главный индекс) можно только с помощью свойства IndexFieldNames, перечислив ключевые поля таблицы, т. к. ключ не имеет имени и поэтому недоступен через свойство IndexName.

.3 Особенности набора данных Query

Компонент TQuery, находящийся на панели BDE, позволяет очень гибко определить условие отбора записей из нескольких таблиц БД.

Основные свойства компонента TQuery

Основные методы компонента TQuery

Свойства класса TParams

Для отображения результатов запросов с компонентом TQuery связываем компонент TDataSource, в свойстве DataSet которого указываем имя объекта (например, Query1). В свойстве DataSourceобъекта TDBGrid1 указываем имя источника данных (например, DataSource1). В свойстве DatabaseName компонента TQuery указываем алиас БД.

.4 Компонент DataSource

Невизуальный компонент DataSource в Delphi представляет собой источник данных, который обеспечивает связь между набором данных и компонентами отображения и редактирования данных.

Все наборы данных должны быть связаны с компонентом источника данных, если требуется редактирование данных. Основное свойство источника данных - DataSet. Оно указывает на компонент набора данных (Table, Query и др), с которыми связан источник. Свойство State дает информацию о текущем состоянии набора данных: находится ли он в состоянии редактирования, вставки данных и так далее.

Основные методы:

Ø  Edit- подтверждает возможность редактирования набора данных (не путать этот метод с методом Edit из набора TDataSet). Объявление: procedureEdit; IsLinkedTo- проверяет связь источника с указанным набором данных. Обычно напрямую не используется, а применяется при разработке новых компонентов.

functionIsLinkedTo(DataSet: TDataSet):Boolean;

События:

Ø  OnDataChange - наступает при перемещении на новое поле или новую запись, если текущая запись редактировалась.

Ø  OnStateChange- наступает при изменении состояния набора данных, связанного с данным источником.

Ø  OnUpdateData - наступает, когда намечается обновление текущей записи.

Основные свойства:

Ø  AutoEdit определяет, вызывается ли автоматически метод редактирования данных Edit.

Ø  DataSet набор данных, с которым связан компонент.

Ø  Enabled определяет, отображается ли данные в компонентах отображения, связанных с этим источником.

Ø  State- указывает текущее состояние набора данных, связанного с источником данных.

.5 Компонент DBGrid

Компонент DBGrid отображает содержимое НД в виде таблицы, в которой столбцы соответствуют полям НД, а строки - записям.

То, как происходит прорисовка данных в сетке TDBGrid - стандартным образом или по определенному сценарию - определяется свойством DefaultDrawing. Если в этом свойстве установить False, то алгоритм прорисовки должен содержаться в обработчиках события OnDrawCollumnCell и OnDrawDataCell (обработчик события OnDrawDataCell введён для совместимости с ранними версиями Delphi).

Для стандартного вывода ячеек используется метод DefaultDrawColumnCell. Если в свойстве DefaultDrawing компонента TDBGrid установить True (задаётся по умолчанию), то обработчики будут вызваны после завершения стандартной процедуры прорисовки, т.е. программный вывод в данном случае накладывается на стандартный. Это может стать причиной неправильного отображения данных. Чтобы исключить нежелательное влияние стандартного вывода необходимо сначала закрасить прямоугольник прорисовки: FillRect(Rect). Событие OnDrawColumnCell возникает при прорисовке каждой ячейки, при этом текущей записью базового НД становиться запись с прорисовываемой ячейкой.

Свойство Options компонента TDBGrid имеет следующие параметры:

1.       dgEditing- разрешает редактирование.

2.       dgAlwaysShowEditor - при выделении столбца автоматически переводит его в режим редактирования.

3.       dgTitles - показывает заголовки столбцов.

4.       dgIndicator- показывает указатель текущей строки в самом левом фиксированном столбце.

5.       dgColumResize- разрешает пользователю с помощью мыши менять ширину столбцов.

6.       dgColLines- показывает в сетке вертикальные разделяющие линии.

7.       dgRowLines- показывает в сетке горизонтальные разделяющие линии.

8.       dgTabs- разрешает переход от столбца к столбцу с помощью клавиши Tab.

9.       dgRowSelect- разрешает выделение цветом всей текущей строки.

10.     dgAlwaysShowSelection - выделение текущей строки цветом сохраняется, даже если компонент теряет фокус ввода.

11.     dgConfirmDelete - требует подтверждения удаления строки.

12.     dgCancelOnExit - если пользователь вставляет пустую строку и покидает её, то она не сохраняется в таблице БД;

13.     dgMultiSelect- разрешает множественный выбор строк.

Если dgEditing = false, то независимо от свойства ReadOnly любого столбца, все данные в сетке будут защищены. Если dgAlwayShowEditor = false, то редактировать выделенный столбец можно после нажатия клавиш F2,илиEnter или после двойного щелчка на ячейке мышью (левой кнопкой).

2. Постановка задачи

Создать базу данных по предметной области: Таможня, которая будет состоять из следующих информационных объектов:

Товары (Код товара, наименование, стоимость, пошлина)

Декларации (Номер декларации, Код товара, количество, дата декларации, ФИО гражданина, код сотрудника)

Персонал (Код сотрудника, код должности, ФИО сотрудника, адрес сотрудника, телефон, год рождения, образование)

Должности (Код должности, наименование должности, оклад).

Система должна обеспечить: