Курсовая работа: Проектирование процесса исследования для модуля корпоративных информационных систем по учету затрат на производстве
Следующим шагом при создании курсовой является генерация базы данных. Для этого используется Interbase.
3. Проектирование базы данных по учету затрат в Delphi.
Для подключения базы данных в Delphiиспользуется компоненты IBDatabase, IBTransaction, IBUpdateSQL, IBQuery, DataSource.
.
Для активации компонента IBDatabase и изменяются его свойства как показано в таблице 1.
Таблица 1.
АктивациякомпонентаIBDatabase, IBTransaction,IBQuery, DataSource.
| Название компонента | Название свойств | |||||
| IBDatabase | DatabaseName | Connected | Defaul Transaction | |||
| C:\ZATRAT.GDB Указать путь из окна обзора. | True указать имя и пароль пользователя, которые указывались при регистрации. | IBTransaction1 | ||||
| IBTransaction | DefaultDataBase | Active | ||||
| IBDatabase | True | |||||
| IBQuery | Database | Transaction | UpdateObject | Active | ||
| IBDatabase | IBTransaction | IBUpdate | True | |||
| DataSource1 | DataSet | |||||
| IBQuery | ||||||
Для активации компонента IBQuery необходимо также ввести SQL запрос в него, а для компонента IBUpdateSQL сгенерировать SQL запрос. Так как база данных состоит из нескольких таблиц, то используется несколько компонентов IBUpdateSQL, IBQuery, DataSource, которые настраиваются отдельно на каждую таблицу. Они служат для связи с отдельной таблицей базы данных.
Для отображения данных используется компонент DBGrid. Он также используется отдельно для каждой таблицы базы данных.
Главной формой для базы данных является форма 1 (рис.4).
Рисунок 4. Внешний вид формы 1.
На этой форме располагаются компоненты BitBtn, которые служат для навигации по таблице, компонент MainMenu, который используется для переключения между другими формами и компоненты Button – используются для управления базой данных (добавление, редактирование, удаление, сохранения данных). Компонент PageControl используется для переключения между таблицей поступление и таблицей использование. Также при нажатии кнопки «Добавить» происходит открытие формы 3 (рис. 5), которая служит для внесения данных в базу данных поступление. На форме 3 для внесения данных служат компоненты DBEdit.
Рисунок 5. Внешний формы 3 «Поступление».
Для внесения данных в таблицу использование служит форма 4, которая имеет аналогичный вид.
При нажатии на форме 1 в строке меню пункта «Фильтр» открывается список, где можно выбрать «Фильтр поступления» и «Фильтр использования». При нажатии на один из этих пунктов открывается соответствующая форма 5 или 6.
При нажатии на подпункт «Фильтр поступления» обрабатывается следующая процедура:
Form5.Show;
Form1.Hide;
DataModule2.IBQueryFPostuplenie.Active:=false;
DataModule2.IBQueryFPostuplenie.Active:=true;
Где первая строка говорит о открытии формы 5 «Фильтр поступления», при этом форма один не закрывается, а скрывается. Это прописано во второй строке. В третьей и четвертой строке активность компонента IBQueryFPostuplenie сначала выключается, а потом включается – это служит для обновления данных, которые были недавно внесены в базу данных.
Форма 5 служит для фильтрации данных из базы данных. Внешний вид формы 5 изображен на рисунке 6.
Рисунок 6. Пример формы 5.
На этой форме для выбора критериев фильтрации данных используются компоненты CheckBox, то есть переключатели, которые расположены на компоненте GroupBox1. При активации CheckBox1 (надпись «По дате») обрабатывается следующая процедура:
procedure TForm5.CheckBox1Click(Sender: TObject);
begin