Разработка системы сохранения результатов анкетирования в базе данных MS SQL Server
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
тии соответствующей кнопки.
Для того чтобы пользователь не мог ввести некорректные данные некоторые поля должны с помощью соответствующих функция проверять правильность введенных данных и выдавать соответствующие предупреждения.
Для просмотра ранее сохраненных данных, необходимо создать еще одну форму. В данной форме должно быть реализовано выполнение следующих действий:
)должен осуществляться переход к определенной анкете по ее ID;
)Должен быть создан набор меток, которые будут отображать найденную информацию согласно пунктам анкетирования;
)в случае если введен не верный ID анкеты, должно появиться соответствующее сообщение;
)должны быть созданы кнопки, нажатие на которые будет осущесствлять переход к следующей анкете или к предыдущей ;
Для удобного доступа к окну просмотра анкет и к окну просмотра информации о программе и ее авторе необходимо создать меню, которое и будет передавать управление дальше.
4 Разработка программного обеспечения и описание пользовательского интерфейса
4.1 Таблица SQL
Для сохранения результатов анкетирования, в среде Microsoft SQL Server Management Studio создали базу Anketa. Чтобы связаться с базой прописали в каждом элементе типа TadoQuery приложения
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Anketa;Data Source=М-ПК
Создали таблицу Table_1 в нашей базе данных.
Рисунок 1 - Таблица Table1
4.2 Главная форма MainForm
Листинг программы приведен в приложении А.
Для работы с базой SQL на форме располагаются элементы DataSource1: TDataSource, ADO: TADOQuery, DBGrid1: TDBGrid.
Согласно изложенному выше плану работы приложения был создан модуль Mform, в котором описана форма MainForm (рисунок 2). На этой форме размещены 4 панели,содержащие элементы для ввода данных анкетирования.
Для большей удобности и экономии пространсво было создано MainMenu1,содержащее 2 вкладки: Анкета, Справка.
Вкладка Анкета имеет 3 пункта:
Заполнить новую-делает активной первую панель,скрывая все остальные,очищатет все элементы ввода для ввода новых данных;
Посмотреть заполненные-показывает модальное окно InfoForm, содержащее информацию об анкетируемых(рисунок 4);
Выход-осуществляет выход из программы.
Вкладка Справка имеет один пункт:
О программе- показывает модальное окно AboutForm с информацией о программе и ее авторе(рисунок 3).
Для того чтобы открываемое окно было модальным вызывается функция showmodal соответствующего экземпляра формы.
Закрытие и уничтожение модальной формы осуществляется с помощью процедуры Release, либо же формы, свойству соответствующей кнопки выхода ModalResult присваивается значение mrCancel.
Навигация между нужными панелями выполняется при помощи кнопок
Назад и Дальше. При работе с первой панелью кнопка Назад в свойстве vision имеет значение false, при работе с остальными панелями true.
При работе с последней панелью кнопка Дальше в свойстве vision имеет значение false, при работе с остальными панелями true.
Также описана процедура:
procedure BdataKeyPress(Key:Char):Char; - возвращает цифру, передаваемую как параметр, если она входит в алфавит, или же является специальным знаком клавиши удаления #8, иначе возвращает пустой символ #0 .Данная процедура используются для предотвращения некорректного ввода в поле TEdit (например, при вводе букв в поле ввода даты рождения анкетируемого).
После создания формы анкетирования переменной povtorSave: boolean этой формы присваивается значение false, это означает, что происходит новое заполнение анкеты.
После правильного заполнения полей,при просмотре последней панели,кнопка Сохранить результат становится активной.
После ее нажатия начинается проверка заполнения,если же поле не было заполнена данные не будут сохранены и программа уведомит пользователя об этом.Далее происходит сохранение данных в базу SQL и переменной povtorSave присвоиться значение true,это означает, что если мы не выберем в меню пункт Новая анкета,то при следующем сохранении данных мы будем видеть диалоговое окно с запросом наших намерений.
Рисунок 2.1 - Главная форма приложения.
Рисунок 2.2 - Главная форма приложения.
программа база данные анкета
Рисунок 2.3 - Главная форма приложения.
Рисунок 2.4 - Главная форма приложения.
Рисунок 3 - Форма О программе.
4.3 Форма просмотра анкет Infoform
На рисунке 4 представлена данная форма.
Для работы с базой SQL на форме располагаются элементы DataSource1: TDataSource, ADO: TADOQuery, DBGrid1: TDBGrid.
При создании данной формы происходит заполнение 1 столбца InfoGrid:TstringGrid и подсчет количества анкет. Количество анкет оображается в Label2.
Для осуществления перехода к определенной анкете,при нажатии кнопки Button1,происходит перемещение по таблице до нужной анкеты и данные выводятся в InfoGrid при помощи процедуры SelectInfo.
Если был введен ID несуществующей анкеты,появится окно предупреждающее об этом и окно ввода ID будет очищено.
При нажатии на кнопку Предыдущая происходит переход к предыдущей анкете,которая будет показана в InfoGrid.
При нажатии на кнопку Следующая происходит переход к следующей анкете,которая будет показана в InfoGrid.
Рисунок 4 - Форма просмотра анкет.
Заключение
В ходе курсовой работы было разработано приложение, позволяющее заносить данные анкетирования в базу данных MS SQL. Также была подробно рассмотрена реализа?/p>