Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
Физическая модель базы данных определяет способ размещения данных в среде хранения и способ доступа к этим данным, которые поддерживаются на физическом уровне.
Для представления информации используется несколько форм. Табличная форма представления информации является наиболее распространенной и понятной. Кроме того, такие семантические более сложные формы, как деревья и сети, путем введения некоторой избыточности могут быть сведены к табличным. При этом данные также будут представлены в форме двумерных таблиц. Такой реляционный подход, в основе которого лежит принцип разделения данных и связей, обеспечивает с одной стороны независимость данных, а с другой – более простые способы реализации хранения и обновления. Ниже представлены таблицы базы данных «Туристическое агентство».
Таблица «Договор» Таблица «Клиент»
Таблица «Оплата за путевку» Таблица «Путевка»
Таблица «Работники»
При разработке базы данных разработчик создал удобный интерфейс. На заглавной форме располагались нужные сведения для работы в туристическом агентстве «Путешествие». С заглавной формой связано ещё несколько вспомогательных форм. При этом работа с базой данных становится лёгкой и простой.
Ниже представлена главная форма, с которой пользователь начнет работу.
Как создавалось: изменить название Form1 на Туристическое агентство. В свойствах формы Form1 Caption прописать Туристическое агентство, в свойстве Color выбрать clCream. На форму вынести 6 объектов Label (метка), один Image (рисунок). Название меток изменить в соответствии с рисунком. Чтобы вставить рисунок на форму: в свойстве Picture объекта Image выбрать нужный рисунок (при помощи кнопок Load и Ok).
Далее программируем: при нажатии на метку «Работники тур.агентства» должна открыться форма, содержащая сведения о персонале агентства. Для этого в событии OnClick метки Label3 («Работники тур.агентства») нужно прописать следующий текст (между словами begin end): form2.show;
Аналогичным методом программируются остальные метки, кроме «Выход». В событии OnClick метки Label6 прописать команду Close.
Чтобы при запуске БД главная форма всегда была в центре экрана нужно в свойстве Position формы Form1 выбрать poScreenCenter. Чтобы пользователь не мог менять размеры формы в свойстве BorderStyle формы Form1 выбрать bsSingle.
Для связывания приложения с таблицами на главную форму вынести объект Database (вкладка BDE). В свойстве AliasName этого объекта выбрать базу, созданную в SQL Explorer. В свойстве DatabaseName дать имя базе. Далее дважды щелкнуть по объекту Database1. В открывшемся окне выбрать путь, где находятся все таблицы (при помощи кнопки Defaults). Далее Ок.
Следующая форма «Работники туристического агентства» позволяет просмотреть данные о персонале агентства.
Как создавалось: на форму Form2 вынести следующие компоненты: DBGrid (вкладка Data Controls), пять Button, Query (вкладка BDE), DataSource (вкладка Data Controls).
Для того, что бы в DBGrid1 выводились данные из таблицы «Работники» нужно воспользоваться компонентами Query1 и DataSource1. Для начала в свойстве DataBaseName компонента Query1 указать базу. В свойстве SQL прописать SQL-запрос на вывод информации в таблицу.
В свойстве Active выбрать значение True. Таблицу DBGrid1 связать с компонентом DataSource1: в свойстве DataSource таблицы DBGrid1 выбрать DataSource1. В свойстве DataSet компонента DataSource1 выбрать Query1.
При открытии Form2 кнопки «Добавить», «Изменить», «Удалить» не активны (свойство Enabled = False компонента Button). При нажатии на ячейки таблицы кнопки становятся активными (обработка события OnCellClick таблицы DBGrid1).
При нажатии на кнопку «Добавить»/ «Изменить» открывается новая форма, позволяющая производить добавление/изменение данных нового (существующего) работника.
При нажатии кнопку «Удалить» из базы удаляется вся информация о выбранном работнике в таблице DBGrid1.
Примечание: для процедуры удаления потребуется компонент Edit1, в котором будет храниться номер выделенного сотрудника в таблице DBGrid1 и Query2 для запроса на удаление. В событии OnCellClick таблицы DBGrid1 прописать следующий текст: А компонент Edit1 сделать «невидимым» - свойство Visible присвоить False. В событии OnClick кнопки «Удалить» прописать следующий текст:
При добавлении информации о новом работнике появиться следующее окно:
При нажатии на кнопку ОК появится сообщение:
При положительном ответе произойдет добавление информации, при отрицательном – нет.
Как создавалось: на новую форму вынести следующие компоненты: Label, Edit, Button, Combobox, Query1. В обработчике событий OnClick для кнопки Button1 прописать следующий текст.
Форма «Поиск информации о персонале» позволяет выбрать из базы нужную информацию по указанным критериям. В БД «Турагентство» реализованы только три критерия: поиск по фамилии, имени, отчеству.
Как создавалось: на форму Form4 вынести следующие компоненты: Radiobutton, Checkbox, Edit, DBGrid, Button и т.д. При нажатии на Radiobutton1 (Один критерий) должны быть активны компоненты Radiobutton3 (Фамилия), Radiobutton4 (Имя), Radiobutton5 (Отчество). Если поиск будет вестись по фамилии, то выбираем Radiobutton3 и т.д. При нажатии на Radiobutton2 (Несколько критерий) должны быть активны компоненты CheckBox1 (фамилия), CheckBox2 (имя), CheckBox3 (отчество). Здесь поиск будет вестись не по одному критерию, а по нескольким.
В свойстве OnClick объекта Radiobutton1 (Один критерий) прописать следующий код:
В свойстве OnClick объекта Radiobutton2 (Несколько критерий) прописать следующий код:
Объекты Radiobutton3 (Фамилия), Radiobutton4 (Имя), Radiobutton5 (Отчество), CheckBox1 (фамилия), CheckBox2 (имя), CheckBox3 (отчество) должны быть скрыты при запуске формы, поэтому у каждого из этих объектов в свойстве Visible нужно прописать False. Далее при нажатии либо Radiobutton3 (Фамилия), либо CheckBox1 (фамилия) в зависимости от критериев должен появиться объект Edit1, при нажатии Radiobutton4 (Имя) или CheckBox2 (имя) – объект Edit2, при нажатии Radiobutton5 (Отчество) или CheckBox3 (отчество) – объект Edit3. Поэтому в событии OnClick этих объектов прописываем следующий код:
Вынести на форму компоненты Query и DataSourse (вкладки BDE и DataAccess). В свойстве DataBaseName компонента Query1 выбрать вашу базу, в свойстве SQL этого объекта прописать запрос:
В свойстве DataSet компонента DataSourse1 выбрать Query1. В свойстве DataSourse объекта DBGrid1 выбрать DataSourse1.
Далее обработать событие нажатия кнопки (OnClick).
При нажатии на кнопку «Изменить» появиться окно для изменения данных о работнике.
При выборе из списка номера работника все его данные отображаются в полях Edit.
Как создавалось: на новую форму вынести следующие компоненты: Label, Edit, Button, DBLookupCombobox (вкладка Data Controls) (эти объекты будут отображаться в окне пользователя). И вспомогательные компоненты: DBGrid, Query (3 компонента), DataSourse (2 компонента). Для Query1, Query2 и Query3 определить базу. В свойстве DataSet компонента DataSourse1 выбрать Query1. В свойстве DataSet компонента DataSourse2 выбрать Query2. В свойстве SQL компонента Query1 написать запрос:
В свойстве Active компонента Query1 выбрать True. В свойстве ListSourse компонента DBLookupCombobox1 выбрать DataSourse1, в свойстве ListField – num_rab, в свойстве KeyField – num_rab. В свойстве DataSourse компонента DBGrid1 выбрать DataSourse2. В свойстве Enabled компонента Button1 выбрать False. В событии OnClick компонента DBLookupCombobox1 прописать следующий текст:
В событии OnClick компонента Button1 прописать следующий текст:
За вывод на печать (в Word) отвечает кнопка «Отчет».
Как создавалось: в событии OnClick компонента Button6 (Отчет) прописать следующий текст:
Что бы из базы данные вывелись в Word, нужно подключить следующие модули (выделены):
Остальные формы выполняются аналогично вышеуказанным действиям.