В столбце «Имя поля» набирается произвольное имя поля, а в следующем столбце «Тип данных» указывается тип для этого поля. Тип данных можно выбрать из раскрывающегося списка.
В нижней части окна задаются индивидуальные свойства для каждого поля. Наборы свойств могут различаться, их состав определяется указанным типом данных поля. При необходимости можно изменять значения свойств (в рамках допустимого для выбранного типа данных).
Таким образом, были созданы все таблицы базы данных, которые имеют вид:
Таблица Группа
Таблица Оператор
Таблица Справка
Для связывания таблиц был использован компонент Схема данных, расположенный на стандартной панели инструментов или в пункте меню Сервис (Схема данных.
При первом обращении к окну «Схема данных» будет предложено и окно добавления новых таблиц. В дальнейшем это окно можно будет вызвать через контекстное меню окна схемы данных, пункт меню Связи (Добавить таблицу или кнопку панели инструментов.
Для изменения связи необходимо открыть окно «Изменение связей» для настраиваемой связи. Это можно сделать через контекстное меню линии связи или выделив линию связи щелчком мыши и дав команду меню Связи (Изменить связь.
Установить флажок «Обеспечение целостности данных». Включение флажка «Обеспечение целостности данных» позволяет защититься от случаев удаления записей из одной таблицы, при которых связанные с ними данные других полей окажутся без связи. Чтобы условие целостности могло существовать, поле основной таблицы должно обязательно быть ключевым, и оба поля должны иметь одинаковый тип. Флажки «каскадное обновление связанных полей» и «каскадное удаление связанных полей» обеспечивают одновременное обновление или удаление данных во всех подчиненных таблицах при их изменении в главной таблице.
Можно также согласиться на каскадное обновление и удаление связанных полей, однако для нашей базы данных это не является необходимым. Дать подтверждение на изменение связей (нажать кнопку «ОК»).
Концы линии связи в окне схемы данных после включения флажка обеспечения целостности данных помечены знаками «1» и «бесконечность». Это означает, что в качестве значений поля из связанной таблицы могут выступать только значения из соответствующего поля основной таблицы и каждое значение из поля основной таблицы может много раз встречаться в поле связанной таблицы (связь «один ко многим»).
Необходимо сохранить макет схемы данных, дав команду меню Файл (Сохранить или нажав кнопку на панели инструментов. Закрыть окно «Схема данных».
В соответствии с информационно-логической моделью базы данных установлены связи между таблицами, заданы параметры обеспечения целостности данных, параметры каскадного удаления и каскадного обновления.
Схема связанных таблиц базы данных имеет вид:
3.2 Ввод данных контрольного примера
Для проверки работоспособности базы данных были введены исходные данные контрольного примера, который был разработан на предыдущих этапах.
Ввод данных осуществлялся посредством разработанных форм.
3.3 Разработка отчетов
Были созданы два отчета, отображающие специфику данной предметной области.
Первый отчет показывает информацию по всем операторам языка программирования Delphi.
Второй отчет показывает справочную информацию по выбранному оператору языка программирования Delphi.
3.4 Разработка пользовательского интерфейса
В результате проектирования базы данных была разработана главная кнопочная форма, через которую можно открыть любую форму, просмотреть любой отчет, запустить любой макрос и выполнить запросы на выборку с параметрами.
Форма носит название «Главная форма».
Она создана с использованием двух подчиненных форм:
1. Подчиненная форма «Оператор»:
2. Подчиненная форма «Справка»:
4 Руководство пользователя
Проект программы содержит следующее окно:
Окно Главная форма содержит список групп операторов. При выборе группу операторов необходимо выбрать оператор языка программирования Delphi, после чего можно прочитать справку по этому оператору и пример реализованный в языке программирования Delphi.
При нажатии на кнопку на экране появится отчет по всем операторам языка программирования Delphi.
При нажатии на кнопку на экране появится справочная информация по выбранному оператору языка программирования Delphi.
При нажатии на кнопку произойдет выход из справочной системы.
5 Текст программы
Form_Главная форма
Option Compare Database
Private Sub Список8_AfterUpdate ()
' Поиск записи, соответствующей этому элементу управления.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst «[Код_группы] = «& Str (Nz (Me![Список8], 0))
If Not rs. EOF Then Me. Bookmark = rs. Bookmark
End Sub
Private Sub Список10_AfterUpdate ()
' Поиск записи, соответствующей этому элементу управления.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst «[Код_группы] = «& Str (Nz (Me![Список10], 0))
If Not rs. EOF Then Me. Bookmark = rs. Bookmark
End Sub
Private Sub Кнопка12_Click ()
On Error GoTo Err_Кнопка12_Click
Dim stDocName As String
stDocName = ChrW (1042) & ChrW (1089) & ChrW (1077) & ChrW (32) & ChrW (1086) & ChrW (1087) & ChrW (1077) & ChrW (1088) & ChrW (1072) & ChrW (1090) & ChrW (1086) & ChrW (1088) & ChrW (1099)
DoCmd.OpenReport stDocName, acPreview
Exit_Кнопка12_Click:
Exit Sub
Err_Кнопка12_Click:
MsgBox Err. Description
Resume Exit_Кнопка12_Click
End Sub
Private Sub Кнопка13_Click ()
On Error GoTo Err_Кнопка13_Click
Dim stDocName As String
stDocName = ChrW (1054) & ChrW (1087) & ChrW (1077) & ChrW (1088) & ChrW (1072) & ChrW (1090) & ChrW (1086) & ChrW (1088)
DoCmd.OpenReport stDocName, acPreview
Exit_Кнопка13_Click:
Exit Sub
Err_Кнопка13_Click:
MsgBox Err. Description
Resume Exit_Кнопка13_Click
End Sub
Private Sub Кнопка14_Click ()
On Error GoTo Err_Кнопка14_Click
DoCmd.Quit
Exit_Кнопка14_Click:
Exit Sub
Err_Кнопка14_Click:
MsgBox Err. Description
Resume Exit_Кнопка14_Click
End Sub
Form_оператор подчиненная форма
Option Compare Database
Sub Form_Current ()
Dim ParentDocName As String
On Error Resume Next
ParentDocName = Me.Parent.Name
If Err <> 0 Then
GoTo Form_Current_Exit
Else
On Error GoTo Form_Current_Err
Me.Parent![Справка подчиненная форма]. Requery
End If
Form_Current_Exit:
Exit Sub
Form_Current_Err:
MsgBox Error$
Resume Form_Current_Exit
End Sub
6 Описание программы
Программа предназначена для использования в общеобразовательных целях, также может использоваться всеми желающими, интересующимися языком программирования Delphi и его операторами. Программа разработана с помощью средства управления базами данными Microsoft Office Access 2003
Для данной программы необходима операционная система Window 95 и выше. Технические характеристики компьютера: Pentium 200 и выше; объем оперативной памяти не менее 16 Мб; жесткий диск объемом не менее 1 Гб.
Исполняемый файл программы «Справочная система» имеет название Справочная система.mdb.
7 Внедрение
Минимальный состав аппаратурных и программных средств.
Pentium 200 и выше;
Объем оперативной памяти не менее 16 Мб;
Жесткий диск объемом не менее 1 Гб;
Оперативная система Windows 95.
Microsoft Office Access 97
Программа «Справочная система по операторам языка программирования Delphi» запускается с помощью файла Справочная система. mdb
Заключение
В данной работе была разработана справочная система по операторам языка программирования Delphi с помощью средств управления базами данными Microsoft Office Access 2003.
База данных содержит:
три таблицы: таблица группа, таблица оператор, таблица справка;
три формы: Главная форма, Оператор подчиненная форма, Справка подчиненная форма;
два отчета: отчет Все операторы, отчет Оператор.
Тестирование созданной программы показало работу без сбоев.
Список литературы
Балиер Э. Профессиональное программирование в Microsoft Office Access 2003: [пер. с англ.] / Э. Балтер.
М.: Вильямс, 2006. — 1296 с.
Блюттман К. A ccess. Трюки: Оригинальные решения задач по обработке данных: [пер.
с англ.] / К. Блюттман. -
СПб.: Питер, 2006. — 331 с.
Дарахвелидзе П.Г., Марков Е. П., Котенок О. А. Программирование в Delphi 5. — СПб.: БХВ-Санкт-Петербург, 2000. — 784 с.
Золотова С. И. Практикум по Access: Подготовительный курс, предваряющий более глубокое изучение технологии баз данных / С. И. Золотова. — М.: Финансы и статистика, 2006. — 143 с.
Зелковиц М., Шоу А., Гэннон Дж. Принципы разработки программного обеспечения / Пер. с англ. — М.: Мир, 1982. — 386 с., ил.
Культин Н. Программирование на Object Pascal. — СПб.: BHV-Петербург, 1998. — 304 с.
Практическое руководство по программированию / Пер. с англ. Б. Мик, П. Хит, Н. Рашби и др.; под ред.
Б. Мика, П. Хит, Н. Рашби. ;
М.: БИНОМ, 2004. — 563 с.
Фокс Дж. Программное обеспечение и его разработка / Пер. с англ. — М.: Мир, 1985. — 368 с., ил.
Хансен Г. Базы данных: разработка и управление: [пер. с англ.] / Г. Хансен, Дж. Хансен. — М.: БИНОМ, 1999. — 704 с.
Начало Формирование информации об операторе
Конец
