Создание программного модуля обработки данных обследования работников предприятий региона (стр. 7 из 10)
В Delphi средства прогона и отладки доведены до совершенства. Такими средствами традиционно оснащаются все инструменты, созданные корпорацией Borland. Можно запустить программу, установив в ней нужные точки контрольного останова - при достижении такой точки программа автоматически прервет свою работу и перейдет в отладочный режим.
Мощность и гибкость языка программирования Delphi – безусловное достоинство, выгодно отличающее эту среду от других инструментов RAD (Rapid Application Development - инструментальные средства ускоренной разработки программ). Ядром языка Delphi является язык Pascal, созданный профессором Цюрихского университета Никлаусом Виртом еще в конце 60-х годов двадцатого века специально для обучения студентов программированию.
От языка Visual Basic Delphi отличает строгая типизированность, позволяющая компилятору еще на этапе компиляции обнаружить многие ошибки, а также наличие средств работы с указателями. Последнее дает возможность использовать связывание с библиотеками типов в технологии COM, в то время как Visual Basic (и Java, в котором тоже не поддерживаются указатели) вынуждены при обращении к COM использовать более медленное позднее связывание и интерфейсы диспетчеризации.
Возможность создавать программы, обслуживающие базы данных, - важная отличительная особенность Delphi. Уже в первой версии этой системы программирования содержались многочисленные специализированные компоненты, облегчающие и упрощающие создание такого рода программ. От версии к версии состав компонентов расширялся, причем, начиная с версии 4, в Delphi появились компоненты, поддерживающие альтернативные технологии обращения к базам данных: помимо единственной для ранних версий технологии BDE (Borland Database Engine – машина баз данных корпорации Borland), в Delphi 6 и 7 поддерживаются технологии ADO (ActiveX Data Object – объекты данных ActiveX) , dbExpress, InterBase Exprress (реализует непосредственный доступ к базам данных InterBase).
Технология BDE отличается максимальной гибкостью (способностью работать как с файл-серверными, так и с клиент-серверными базами данных) и скоростью обработки данных. BDE представляет собой совокупность динамических библиотек и драйверов, предназначенных для низкоуровнего доступа к данным самых различных форматов. Она работает с таблицами самых распространенных СУБД (систем управления баз данных), как файл-серверных (dBase, Paradox, FoxPro, Clipper), так и клиент-серверных (InterBase, Microsoft SQL Server, Oracle и др.). В BDE имеется собственный интерпретатор языка SQL, что позволяет создавать запросы не только к серверам баз данных, но и к таблицам файл-сервера.
Механизм ADO доступа к информации вазы данных является стандартом фирмы Microsoft. Использование этой технологии подразумевает использование настраиваемых провайдеров данных. Технологии ADO обеспечивают универсальный механизм доступа из приложений к информации источников данных. Эта технология основана на стандартных интерфейсах COM, являющихся системным механизмом Windows. Это позволяет удобно распространять приложение баз данных без вспомогательных библиотек.
Механизм доступа dbExpress подразумевает использование совокупности драйверов, компонентов, инкапсулирующих соединения, транзакции, запросов, наборов данных и интерфейсов, с помощью которых обеспечивается универсальные доступ к функциям этого механизма. Обеспечение взаимодействия с сервисами баз данных по технологии dbExpress основана на использовании специализированных драйверов. Последние для получения данных применяют запросы SQL.
На стороне клиента нет кэширования данных, здесь применяют только одно направленные курсоры и не обеспечивается возможность прямого редактирования наборов данных. Объекты БД в Delphi основаны на SQL и включают в себя полную мощь Borland Database Engine. В состав Delphi также включен Borland SQL Link, поэтому доступ к СУБД Oracle, Sybase, Informix и InterBase происходит с высокой эффективностью.
Разработчик в среде Delphi, проектирующий информационную систему для локальной машины, может использовать для хранения информации файлы формата .dbf (как в dBase или Clipper) или .db (Paradox). Если же он будет использовать локальный InterBase for Windows 4.0 (это локальный SQL-сервер, входящий в поставку), то его приложение безо всяких изменений будет работать и в составе большой системы с архитектурой клиент-сервер.
3 СОЗДАНИЕ ПРОГРАМНОГО МОДУЛЯ ОБРАБОТКИ ДАННЫХ ОБСЛЕДОВАНИЕ РАБОТНИКОВ ПРЕДПРИЯТИЙ РЕГИОНА
Проект состоит из десяти форм, одного файла базы данных и одного файла картинки, предназначенного для оформления форм приложения. Также в состав входит справочный файл HELP.hlp, созданный с помощью средств Delphi7. Более подробный состав файлов программного интерфейса приведен ниже в таблице 1.
Каждая форма проекта состоит из нескольких различных файлов. Pas-файл содержит программный код модуля, который был сформирован в окне редактора кода совместными усилиями программиста и среды Delphi, в файле с расширением .dfm храниться описание содержимого окна формы, а в dcu-файле находится результат преобразования текста из обоих файлов в машинные инструкции. Компоновщик, входящий в интегрированную среду Delphi, преобразует dcu-файлы в единый загрузочный (исполняемый) exe-файл. Исполняемый файл позволяет запускать программу как автономное приложение.
Таблица 1
Состав файлов проекта
| № | Наименование | Назначение |
| 1 | ProgMod.exe | Исполняемое приложение. |
| 2 | ProgMod.dpr | Файл проекта (главный модуль проекта). |
| 3 | ProgMod.cfg | Файл конфигурации проекта. |
| 4 | ProgMod.dof | Файл опций проекта. |
| 5 | ProgMod.~dpr | Резервная копия проекта. |
| 6 | modul.* | Файлы главной формы проекта |
| 7 | fAnket.* | Файлы формы «Анкета» |
| 8 | fPsBlag.* | Файлы формы «Вопрос №» |
| 9 | fEndPsBlag.* | Файлы формы «Спасибо» |
| 10 | fDiagMot.* | Файлы формы «Диагностика мотивационной сферы» |
| 11 | fEndDiagMot.* | Файлы формы «Спасибо» |
| 12 | fObAnk.* | Файлы формы «Обработка анкет» |
| 13 | fPoiskDB.* | Файлы формы «Поиск» |
| 14 | fRezult.* | Файлы формы «Результат» |
| 15 | fOProgr.* | Файлы формы «О программе» |
| 16 | modul.mdb | База данных Access |
| 17 | заставка.jpg | Заставка программы |
| 18 | HELP.hlp | Файл справки |
Для обработки, хранении результатов тестирования и поиска информации, с помощью СУБД Microsoft Access 2003, была создана база данных, которая содержится в файле modul.mdb. В состав базы данных входят пять таблиц. На Рисунке 6 представлена схема таблиц базы данных modul.
Рисунок 6. Схема данных «modul.mdb»
Между таблицами «anketa» и «RezPB», а так же между таблицами «anketa» и «RezDM» существует связь типа «один ко многим».
Таблица «anketa» содержит анкетные данные тестируемого и дату прохождения тестов (Data_zap). Ключевым полем таблицы является индивидуальный номер работника, который присваивается ему на предприятии или номер студенческого билета (для учащихся). Внешний вид
таблицы приведен на Рисунке 7.Рисунок 7. Таблица «anketa»
Таблица «PsBlag» содержит: вопросы-утверждения теста «Психологическое благополучие личности». В таблице отражена принадлежность вопроса к одной из шести шкал этого теста: позитивное отношение (poz), автономия (av), управление средой (ups), личностный рост (lr), цель в жизни (cel), самопринятие (sam). Так же таблица «PsBlag» содержит способ обработки ответов на вопросы: по восходящей шкале (vos) или нисходящей (nis). Внешний вид таблицы приведен на Рисунке 8.Рисунок 8. Таблица «PsBlag»
В таблице «DiagMot» хранятся утверждения теста «Диагностика мотивационной сферы». Внешний вид таблицы приведен на Рисунке 9.
Рисунок 9. Таблица «DiagMot»
Таблица «RezPB» (Рисунке 10) необходима для хранения результатов тестирования по шести шкалам теста «Психологическое благополучие личности».
Рисунок 10. Таблица «RezPB»
Таблица «RezDM» содержит количество выборов, выпавших на каждое из пятнадцати утверждений при прохождении тестируемым теста «Диагностика мотивационной сферы». Внешний вид таблицы приведен на Рисунке 11.Рисунок 11. Таблица «RezDM»
База данных modul содержит запросы «zapNOR» и «zapShk» в которых обрабатываются данные по пройденным тестам. Запросы служат для фильтрации набора данных. Они позволяют выбрать из базы данных только необходимую информацию, т.е. ту, которая соответствует определенному критерию (условию) и нужна для решения конкретной задачи. При создании запросов применяющихся в данной программе были выбраны критерии отбора данных по предприятию (Рисунок 12) и цеху (Рисунок 13).