Создание базы данных "Телефонный справочник"

Вместе с окном кода обычно активизируется) браузера Code Explorer, облегчающее поиск нужных элементов в случае, когда в окне набрано много строк кода (рисунок 5)

 

 

Рис. 5. Окно кода с расположенным слева браузером Code Explorer

 

Двойной щелчок мышью  на элементе в окне браузера приводит к позиционированию текстового указателя в окне кода на описание соответствующего объекта или его первое упоминание. При разработке несложных учебных программ можно закрыть окно браузера маленькой кнопкой в его верхнем правом углу. Восстановить закрытое окно можно после щелчка правой кнопкой мыши по окну кода и выбора опции view Explorer. Замечу, что окно браузера располагается на вспомогательной панели и имеет управляющую полосу в верхней части рамки. “Схватив” ее мышью, вы можете перетащить окно на любое свободное место экрана или “причалить” его к окну Инспектора объектов.

В версии 6 на нижней кромке окна кода располагаются две закладки - Сode и Diagram. Щелчок по последней активизирует страницу диаграмм (рисунок 6). Первоначально эта страница пуста. Чтобы наполнить ее, нужно “перетащить” мышью два и более компонента из окна Инспектора компонентных связей. На рисунок 6 это окно присвоено к окну браузера. Чтобы перетащить компоненты в поле диаграмм, нужно нажать и удерживать клавишу Shift, после чего щелкнуть по компонентам и, продолжая удерживать Shift, переместить указатель мыши в поле диаграмм и щелкнуть по нему левой кнопкой.

 

 

Рис.6. Пример страницы диаграмм

 

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

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2.Создание  Базы данных «Телефонный справочник»

 

 

2.1. Delphi и базы данных

 

Для работы с  базами в Delphi есть несколько наборов компонент. Каждый набор очень хорошо подходит для решения определённого круга задач. Все они используют разные технологии доступа к данным и отличаются по возможностям. В отличие от Microsoft, которая встроила в свои продукты разработки только технологию доступа к данным ADO собственной разработки, фирма Borland дала нам разнообразие средств работающих через разные технологии и не ограничивает нас только своими разработками. Такое положение вещей даёт нам громадные преимущества перед другими программистами.

Для создании таблиц в  базе данных  Delphi существует несколько  способов:

- Borland Database Engine (BDE)

- Database Desktop

- Microsoft Office Access

 

2.2. Как создавать и использовать базы данных Access.

 

В моей курсовой работе я  выбрал Microsoft Office Access. И сделал следующее запустил Access и выбери в меню Файл->Создать. В мастере создания базы выбрал пункт "База данных" и нажал "ОК" (рисунок 7). А назвал я свой файл database.mdb.

 

 

Рис 7 Окно создания новой базы данных

 

После этого Access создаст базу и сохранит её по указанному пути. Далее появиться окно как на рисунке 8, в котором и происходит работа с базой. С левой стороны окна находится колонка выбора объектов, с которыми нам нужно будет работать. Первым находится пункт "Таблицы" В окне справа находится три пункта:

1. Создание таблицы в режиме конструктора
2. Создание таблицы с помощью мастера
3. Создание таблицы путём ввода данных

 

 

Рис 8 Окно создания новой базы данных

 

С помощью  этих команд можно создать таблицы  внутри созданной базы данных, Access, которая может хранить в одном файле несколько таблиц. Все данные в базах данных хранятся в виде двухмерных таблиц. Колонки в таблицах называются полями, и по ним определяется, какие именно данные хранятся в таблице Щёлкни по "Создание таблицы в режиме конструктора" чтобы создать новую таблицу в базе данных. Перед тобой откроется окно, как на рисунке 9.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Рис 9 Окно создания таблицы

 

Сверху находится  сетка, в которой вводиться поля таблицы, их тип и описание. Когда вписали в сетку имя нового поля и указал тип, внизу окна появляются свойства нового поля. В зависимости от типа поля изменяется и количество свойств.

Теперь выделив первое поле (Key1), щёлкни правой кнопкой мыши и выбери пункт "Ключевое поле". Задание ключевого поля является обязательным действием, если этого не сделает, то таблица не сможет редактироваться, а это значит, что в неё нельзя будет добавить строки.

 В данной таблицы ввели:

1. Имя поля - Key1. Тип - счётчик. Это у нас будет ключик. Размер поля - "Длинное целое". Индексированное поле - "Да (Совпадения не допускаются)".
2. Имя поля - Фамилия. Тип - текстовый. Размер поля - 50. Индексированное поле - "Да (Допускаются совпадения)".
3. Имя поля -Имя. Тип - текстовый. Размер поля - 50. Индексированное поле - "Да (Допускаются совпадения)".
4. Имя поля – e-mail. Тип - текстовый. Размер поля - 10. Индексированное поле - "Да (Допускаются совпадения)".
5. Имя поля - городl. Тип - числовой. Размер поля - 20. Индексированное поле - "Да (Допускаются совпадения)".
6. Имя   поля  - Дата рождения Дата/время.  Тип   -   числовой.   Размер   поля   -   Длинное   целое. 
   Индексированное поле - "Нет".
7. Имя поля – Color. Тип - Текстовый Размер поля - 10. Индексированное поле - "Да (Допускаются совпадения)".

Помимо этого, у всех полей значение "Обязательно поле" стоит в "Нет", и "Пустые строки" выставлено в "Да". Если ты сделаешь поле обязательным, то во всех строках обязательно должно быть заполнено соответствующее поле. Если запретить пустые строки (поставить «Нет»), то в указанном поле должно быть обязательно что-то введено, иначе произойдёт ошибки. В реальных условиях, если какое-то поле обязательно должно иметь значение, то лучше сделать его обязательным.

Теперь выделив первое поле (Key1), щёлкнуть правой кнопкой мыши и выбери пункт "Ключевое поле". Задание ключевого поля является обязательным действием, если этого не сделать, то таблица не сможет редактироваться, а это значит, что в неё нельзя будет добавить строки.

Теперь таблицу можно сохранять и закрывать. Первая база данных готова. Закрываем её и переходи к в Delphi.

 

2.3. Пример работы с базами данных

 

 Напишем программу, которая будет работать с базой данных MS Access. Создадим новый проект. И бросим на форму компонент ADO Connection с закладки ADO палитры компонентов.

Нужно будет  настроит соединение с сервером, которое должно быть прописано в свойстве Connection String. Для этого надо дважды щёлкнуть по строке Connection String и откроется окно, как на рисунке 10.

 

 

Рис 10 Окно создания подключения к базе

 
Здесь будет стоят выбор:

1. Использовать специальный файл (Use Data Link File);
2. Использовать строку подключения (Use Connection String) Рисунок

 

 

Рис 12 Окно создания строки подключения

 

На закладке Provider перечислены все доступные ADO драйверы доступа к базам данных. Если какого-то драйвера нет, то можно попробовать выделенный по умолчанию «Microsoft OLE DB Provider for ODBC Drivers». Этот драйвер позволяет получить доступ к базе данных через ODBC драйвер, которые есть к большинству существующих баз данных.

В нашем случае, для доступа к базам данных MS Access используется драйвер «Microsoft Jet OLE DB Provider». Такой драйвер обязательно устанавливается на машину вместе с MS Office, а в последних версиях Windows он устанавливается по умолчанию.

Вид закладки Connection зависит от выбранного драйвера. В нашем случае он выглядит, как показано на рисунке 13.

Первым делом, в этом окне надо ввести имя базы данных и путь к нему в строку «Select or enter a database name». Если база данных будет располагаться в той же директории, что и запускной файл, то путь указывать не надо.

 

 

 

 

Рис 13 Закладка Connection

 

Чтобы легче  было выбрать файл базы данных необходимо щёлкнуть по кнопке с точками справа от строки ввода.

Как выберем базу данных, необходимо нажать кнопку Test Connection, чтобы протестировать соединение. Если всё указано правильно, то должен выйти сообщение «Test connection succeeded». Всё, можно нажать ОК, чтобы закрыть окно создания строки подключения и ещё раз ОК, чтобы закрыть окно редактора строки подключения.

Теперь в  свойствах компонента ADO Connection отключим свойство Login Prompt, выставив его в False. А теперь выставим свойство Connected в True, чтобы произошло соединение с базой.

На этом соединение можно считать оконченным. Теперь нам надо получить доступ к созданной нами таблице «Справочник». Для этого бросим на форму компонент ADO Table с закладки ADO палитры компонентов. Сразу измени его свойство Name на Book Name.

В этом компоненте тоже есть свойство Connection String и его так же можно настраивать. Теперь необходимо указать у этого компонента BookName в свойстве Connection, созданный компонент соединения с базой данных. Щёлкнув в выпадающему списку в свойстве Connection и выберем там единственный пункт ADO Connection1. Теперь нам не надо заполнять свойство Connection String.

Теперь в свойстве Table Name нужно выбрать имя таблицы (Справочник). Всё, таблица и соединение указаны, можно подключатся. Для этого выставим свойство Active в true.

 

Для отображения  данных из таблицы надо ещё установить на форму компонент Data Source с закладки Data Access палитры компонентов. Теперь этому компоненту надо указать, какую именно таблицу он должен отображать. Для этого в свойстве Data Set нужно из выпадающего списка выбрать таблицу Book Table.

Все приготовления  готовы, можно приступать к отображению данных. Самый простой способ отобразить таблицу - установить компонент DB Grid. Это компонент-сетка, которая может отображать данные в виде таблицы. В этом же компоненте можно добавлять, удалять и редактировать строки  таблицы

 

 

Рис 14 Форма  нашего приложения

 

И последний  этап создания приложения - связывание компонента сетки с компонентом отображения таблицы. Для этого в свойстве Data Suorce компонента DB Grid нужно указать созданный нами компонент Data Source 1.

 

2.4. Создание Data Module

 

Теперь выберем из меню File->New->Data Module (рисунок 15). Этим Delphi создает специальное окно Data Module, которое удобно подходит для хранения компонентов доступа к базам данных.

 

 

Рис 15 Создание модуля Data Module

 

 

Теперь вырежем  три компонента на  главной форме Book Name, Data Sours1 и Book Table1 и перейдем на модуля Data Module, выберем из меню Edit пункт Paste, чтобы вставить в это окно вырезанные нами компоненты. Рисунок 16

 

 

Рис 16 Окно Data Module

 

Теперь все  компоненты, которые предназначены  для доступа к базе данных будем располагать здесь, чтобы с ними удобно было работать. Сохраним новый модуль под именем Data Module Unit.

Что бы было легче  переключаться между формами  и код окнами можно с помощью  этих кнопок (формы с права)

Теперь переходим  в модуль Data Module и попытаемся настроить отображение данных. Дважды щёлкнем по компоненту Book Table и появиться окно редактирования полей базы данных (рис 17).

 

 

Рис 17 Окно редактирования полей базы данных

 

Пока что оно пустое и суда нужно добавить все поля базы данных. Для этого нажмем правой кнопкой мыши и в появившемся меню выберем пункт Add АН Field (Добавить все поля). Окно автоматически заполниться именами полей (рис 18).

 

Рис 18 Заполненное  окно редактирования полей базы данных

 

Первое, что  нужно сделать - убрать из видимости счётчик (поле Key). Выделим в свойстве Visible значение false (это свойство есть у всех полей). Теперь отредактируем длину отображения колонок. Для этого выдели свойство «Фамилия». В базе данных мы выделили под это поле 50 символов. В сетке ширина колонки будет отображаться по умолчанию на всю длину. Но чаще всего фамилии не превышают 20 символов, поэтому нет смысла отображать всю длину. На много удобней отображать только 20 символов, а если что-то не поместиться, то пользователь программы в любой момент сможет раздвинуть колонку и увидеть недостающие символы.

Выдели поле «Дата». Первое, что нужно сделать это уточнить, какую именно дату здесь надо вводить. Так как это телефонный справочник, то здесь указываться дата рождения владельца телефона. Поэтому будет правильнее в заголовке сетке отображать не просто «Дата», а «Дата рождения». Тут можно поступить двумя способами - отредактировать имя поля в базе данных или просто заставить Delphi отображать в заголовке поля нужный текст.

За текст  отображаемый в заголовке отвечает свойство Display Label. Введём нём текст «Дата рождения».

 

2.5. Создание таблицы: Справочник городов

 

Настало время работать с полем Город которое имеет числовой тип и никак не может пока хранить данные о городе. Для этого мы создадим отдельную таблицу в нашей базе данных с полями: