Информационная система учета и контроля посещаемости студентов

Размещено на Allbest.ru

ВВЕДЕНИЕ

информационная система учет контроль

Показателем работы студентов и преподавателей, обучающих их, является успеваемость по дисциплинам, что находится в прямопропорциональной зависимости от процента посещаемости занятий. Руководство института заинтересованно в том, чтобы осуществлялся непрерывный учет и контроль за деятельностью студентов, а именно за их посещаемостью. На данный момент учет и контроль осуществляется «вручную». Обработка данных «вручную» является трудоемкой и занимает много времени. Кроме того, задачи учета и контроля посещаемости и успеваемости студентов осложняются еще и тем, что необходимая информация хранится на бумажных носителях.

Именно поэтому необходима автоматизация процесса обработки информации. Повышение оперативности учета и контроля посещаемости и успеваемости студентов будет способствовать увеличению производительности и снижению трудоемкости решаемых задач.

Информационная система должна быть по возможности независимой от других программных средств. С этой целью она будет создана в среде программирования C++Builder 6, которая даст возможность откомпилировать систему и привязать ее к операционной системе MS Windows. Также средства C++Builder 6 позволяют легко связаться с приложениями MS Office.

В процессе установки программного обеспечения информация обо всех учащихся и сотрудниках учебного заведения будет упорядочена в единую базу данных, которая физически разместится в защищенном от постороннего доступа промышленном компьютере, устанавливаемом на территории учебного заведения. База данных будет находиться в собственности учебного заведения. Доступ к базе данных будут иметь исключительно сотрудники учебного заведения.

РАЗРАБОТКА МОДЕЛИ БАЗЫ ДАННЫХ

Данная разработка предназначена для сбора, обработки и предоставления аналитической информации в целях повышения качества работы профессорско-преподавательского состава и административного персонала высшего учебного заведения по управлению учебно-воспитательным процессом [2].

Рассмотрим основные функции решаемой задачи:

1. Формирование сведений о студенте.

2. Учет посещаемости занятий студентом в течение сессии, месяца.

3. Контролирование студентов, не получивших «контрольные точки» за месяц.

4. Регулирование посещаемости студента в течение сессии, месяца.

5. Формирование сведений о преподавательском составе

6. Контроль за выполнением педнагрузки преподавательским составом.

Этой работой занимаются: секретарь и начальник учебной части, преподаватели кафедры, секретарь и начальник отдела кадров, заведующий кафедрой и декан факультета.

Секретарь учебной части занимается вводом всех необходимых сведений о студентах [3]. Секретарь отдела кадров производит ввод данных о преподавательском составе. Преподаватели вводят пропуски студентов по своим дисциплинам. Заведующий кафедрой и декан факультета не занимаются вводом данных, а осуществляют контроль, просматривая необходимую для них информацию.

В качестве входных данных используются сведения, содержащиеся в первичных документах.

1) Список преподавателей:

- код преподавателя;

- ФИО преподавателя;

- адрес преподавателя;

- электронный адрес;

- телефон преподавателя.

2) Список факультетов:

- код специальности;

- наименование специальности;

- описание специальности.

3) Список учебных групп:

- код учебной группы;

- название группы;

- код факультета;

- дата формирования.

4) Карточка студента:

- код студента;

- номер зачетной книжки студента;

- ФИО студента;

- дата рождения студента;

- номер учебной группы;

- адрес студента;

- электронный адрес;

- телефон студента;

5) Список аудиторий:

- код аудитории;

- название аудитории;

- месторасположение аудитории.

6) Вид занятий:

- код занятия;

- название занятия;

- описание занятия.

7) Список занятий по штатному расписанию:

- код занятия;

- код предмета;

- код преподавателя;

- номер аудитории;

- номер группы;

- код занятия;

- дата проведения.

8) Список предметов:

- код предмета;

- название предмета;

- описание предмета.

9) Журнал посещаемости:

- код записи;

- код занятия;

- код студента;

- маркер отсутствия на занятии;

- код предмета;

- дата проведения занятия.

Описание реквизитов входной информации представлено в таблице 1. 1

Таблица 1. 1 - Описание реквизитов входной информации

Наименование реквизитов входных документов

Тип данных

Код преподавателя

Числовой

ФИО преподавателя

Текстовый

Адрес преподавателя

Текстовый

Электронный адрес

Текстовый

Телефон преподавателя

Текстовый

Код факультета

Числовой

Название факультета

Текстовый

Описание факультета

Текстовый

Код учебной группы

Числовой

Название группы

Текстовый

Дата формирования

Дата

Код студента

Числовой

Номер зачетной книжки студента

Числовой

ФИО студента

Текстовый

Дата рождения студента

Дата

Адрес студента

Текстовый

Электронный адрес студента

Текстовый

Телефон студента

Текстовый

Код аудитории

Числовой

Название аудитории

Текстовый

Месторасположение аудитории

Текстовый

Код занятия

Числовой

Название занятия

Текстовый

Описание занятия

Текстовый

Дата проведения занятия

Дата

Код предмета

Числовой

Название предмета

Текстовый

Описание предмета

Текстовый

Код уведомления

Числовой

Текст уведомления

Текстовый

Название уведомления

Текстовый

Код записи

Счетчик

Маркер отсутствия на занятии

Логический

Выходными документами для системы являются следующие отчеты, которые формируются системой на основании входной информации:

- Список студентов учебной группы.

- Список учебных групп.

- Отчет по посещаемости группы.

- Отчет по количеству часов занятий пропущенных студентом.

В качестве информационной базы будущей системы будет использоваться реляционная СУБД. Для этого сначала следует разработать логическую структуру реляционной базы данных - построить концептуальную модель предметной области системы.

Все этапы разработки информационного обеспечения должны строго следовать друг за другом, иначе вместо слаженной и работоспособной системы получится простой набор плохо связанных модулей и объектов.

1. 1. Проектирование базы данных информационной системы

1. 1. 1. Концептуальная схема модели данных

Концептуальная модель - это абстрактная модель, определяющая структуру моделируемой системы, свойства её элементов и причинно-следственные связи, присущие системе и существенные для достижения цели моделирования. Построим ее, исходя из описания предметной области, средствами программы Power Designer.

Перед началом работы сгенерируем из вышеуказанных таблиц инфологическую модель. Для этого:

определим атрибуты каждой сущности и их характеристики: статическая или динамическая, необязательность или обязательность для заполнения, множественность или однозначность значения, которое это атрибут принимает;

определим первичные ключи для каждой сущности;

определим связь между таблицами и назовем связь. Для связей определим их характеристики: тип связи (1: 1, 1: М, М: 1, М: М), направление связей (в зависимости от того, какая из таблиц служит справочной), класс принадлежности (обязательный или необязательный) ;

Проверим полученную схему на соответствие третьей нормальной форме.

Воспользовавшись данными таблицы 1. 1, заполняем формы Entity. [5] Пример приведен на рисунке 1. 1 для таблицы «Студенты».



Рис 1. 1 - Пример заполнения формы Entity для таблицы «Студенты».

На панели инструментов выберем инструмент Relation и установим связь между сущностями. Установим нужный тип связи (One-one (1: 1), One-many (1: М), Many-one (М: 1), Many-many (М: М)), класс принадлежности. В результате получим схему, представленную на рисунке 1. 2.

Рис. 1. 2 - Концептуальная модель

1. 1. 2. Физическая модель базы данных

Преобразуем созданную в предыдущем разделе концептуальную модель в даталогическую (физическую) модель базы данных. Под. физической моделью понимают описание реализации объектов логической модели на уровне объектов конкретной базы данных. Для этого в програмне PowerDesigner выполним команду ToolsGeneratePhysicalDataModel и получим искомую модель (рисунок 1. 3).

Рис 1. 4 - Физическая модель.

Для корректности связей проверяем соответствие полей из связанных таблиц. Эту проверку можно выполнить на вкладке Joins окна Referenceproperties (рисунок 1. 5).

Рис. 1. 5 -Проверка корректности связей на примере таблиц «студент» и «пропуски».

1.2 Требования к информационной системе

Создаваемая информационная система должна соответствовать уровню современных Windows-приложений, обладать интуитивно-понятным интерфейсом, действия пользователя не должны сильно отличаться от обычных действий в других приложениях операционной системы Windows.

Программа должна обеспечивать накопление, хранение, извлечение и обновление первичных данных, и возможность корректировки выходных данных.

Форма ввода входной информации и вывода выходной информации должна настраиваться пользователем, при этом соответствуя стандартам, существующим в данной предметной области.

Информационная система учета и контроля посещаемости студентов должна выполнять следующие функции:

- производить ввод входной информации;

- выдавать запрашиваемую справочную информацию;

- производить быстрый поиск необходимой информации;

- формировать сведений о студенте;

- вести учет посещаемости студента в течение сессии;

- формировать сведения о преподавательском составе ВУЗа;

- выдавать соответствующие отчеты.

Создаваемая система не должна при своей работе в операционной системе вызывать сбои и нарушать работу других работающих приложений. Если все-таки из-за каких-либо непредвиденных обстоятельств сбой произошел, то система должна остаться работоспособной.

Все входные документы, используемые системой при работе, а также выдаваемые ею выходные документы должны быть непротиворечивы по отношению к операционной системе.

1.3 Условия эксплуатации программного продукта

Условия эксплуатации программного продукта должны соответствовать условиям, предъявляемым к работе любого приложения операционной системы MS Windows.

Кроме того, рабочее место пользователя должно соответствовать всем необходимым условиям и требованиям, определяющим безопасность и производительность его работы с персональным компьютером (подробно об этом рассказывает глава 4 данной пояснительной записки).

1.4 Требования к аппаратной составляющей при использовании программного продукта

Для правильной и оптимальной работы программы требуется персональный компьютер со следующими минимальными характеристиками:

- процессор IntelPentium IV и выше, а также совместимые с ним процессоры других фирм;

- объем оперативной памяти не менее 1Гб;

- свободное дисковое пространство не менее 10 Мб (в случае полной установки системы со всеми сопутствующими файлами и библиотеками) ;

- HDD Samsung180Гб;

- видеокарта Radeon960 128Мб и выше;

- видеоадаптер 16 Мб и выше;

- манипулятор «мышь» для удобства управления работой системы.

Так как система будет функционировать в операционной системе MS Windows, то она должна быть совместима со всеми процессами, протекающими в ней. Наиболее оптимальным будет наличие у пользователя операционной системы MS Windows Professional, обладающей всеми необходимыми условиями и требованиями для правильной работы программы.

2. ВЫБОР СРЕДЫ РАЗРАБОТКИ СИСТЕМЫ

Целью разрабатываемого проекта является создание информационной системы учета и контроля посещаемости студентов ЛНУ имени Тараса Шевченко. Учебный процесс ВУЗа предполагает обработку большого количества документации. При большом объёме информации, которую необходимо хранить, просматривать, редактировать, а также на её основе осуществлять быстрый поиск необходимых данных и формировать некоторые выходные документы, требуется автоматизация. Создание хорошо отлаженной информационной системы позволяет значительно сократить трудоёмкость работ, время поиска необходимой информации, время формирования выходной документации, повысить эффективность и производительность труда в целом.

Внедрение предлагаемой системы позволит автоматизировать труд, что, в свою очередь, позволит сократить трудоёмкость перечисленных выше функций, а также время, затрачиваемое на их выполнение.

В данном разделе представлено технико-экономическое обоснование разработки информационной системы учета и контроля успеваемости и посещаемости студентов.

В настоящий момент на рынке программного обеспечения существует ряд продуктов, которые решают данные задачи, но не существует абсолютно универсальных программных продуктов, следовательно, всегда необходима адаптация продукта к предметной области, зачастую требующая привлечения профессиональных, а значит и высокооплачиваемых специалистов.

Разрабатываемая информационная система не требует адаптации, существенных денежных затрат.

Эксплуатационно-технический уровень (ЭТУ) разрабатываемого продукта - это обобщающая характеристика его эксплуатационных свойств, возможностей, степени новизны, являющихся основой качества продукта. Для обобщающей характеристики ЭТУ системы целесообразно использовать аддитивно-мультипликативный показатель «значимость технического решения» (Зтр) в общем, виде рассчитываемый по формуле:

где Аи - коэффициент актуальности решенной технической (проектной) задачи;

Пр - коэффициент соответствия решенной технической задачи программам важнейших работ научно-технического прогресса;

Сз - коэффициент сложности решенной технической задачи;

Мк - коэффициент места использования решенной технической задачи;

Ои - коэффициент объема использования решенной технической задачи;

Шо - коэффициент широты охвата охранными мероприятиями решенной технической задачи.

В таблице 2. 1 представлены значения показателя « Зтр».

Таблица 2. 1 - Расчет показателя « Зтр»

Таким образом, из данной таблицы видно, что разрабатываемый программный продукт имеет более высокий показатель эксплуатационно-технического уровня.

Решение о технической обоснованности разработки проекта принимается путем определения коэффициента эксплуатационно-технического уровня, с помощью оценки которого можно провести сравнение качества разрабатываемого проекта с существующим аналогом (базой сравнения). Коэффициент рассчитывается по формуле:

где Зтрпр, Зтрбаз - значения показателя «значимость технического решения» для проектируемого и базового вариантов соответственно.

Вычислим коэффициент эксплуатационно-технического уровня Кэту по формуле:

Очевидна оправданность разработки проекта с технической точки зрения.

Для разработки системы было задействовано два человека:

- руководитель проекта - выдаёт задание, консультирует и контролирует работу студента дипломника;

- исполнитель

Руководитель формирует постановку задачи и отвечает за работу по созданию системы. Исполнитель отвечает за проектирование информационного и методического обеспечения, организует программное обеспечение, отвечает за работу системы.

Выбор комплекса работ по разработке проекта производится в соответствии со стандартом, устанавливающим стадии разработки: ГОСТ 19. 102-77 «Единая система программной документации». [6]

Перечень этапов работы по разработке представлен в таблице 2. 2.

Маркетинговые исследования показали, что в городе на рынке существуют подобные программы, но они не подходят для ЛНУ в виду их узкой направленности.

Но если взять, например, 1С: Предприятие, то суммарные затраты, связанные с её внедрением складываются из следующих затрат:

- затраты на приобретение программного продукта аналога 55000руб. ;

- затраты по оплате услуг на установку и сопровождение продукта 3500 руб. (15 часов сопровождения) ;

- затраты на основное и вспомогательное оборудование 7000 руб. ;

- затраты по подготовке пользователя 4500 руб. (15 часов) ;

Итого суммарные затраты, связанные с внедрением аналога составляют 70000 руб.

Таким образом, становится очевидна оправданность разработки проекта.

Рассмотрев существующие системы, мною был сделан вывод: все программные продукты обладают некоторыми недостатками. Поэтому было принято решение о разработке собственного программного продукта.

Основным компонентом при любой информационной системе является база данных, но при проектировании автоматизированной системе необходимо решать задачи выбора систем управления базами данных.

В настоящий момент на мировом рынке существует большое количество различных СУБД,. Но предпочтение отдано СУБД MS SQL, так как она позволяет сохранять большой объем данных, осуществляет тесную интеграцию с другими программными продуктами от Microsoft [13].

C++Builder 6 стал одними из самых популярных на сегодняшний день инструментов для создания как настольных, так и корпоративных информационных систем благодаря уникальному сочетанию удобства разработки пользовательских интерфейсов, компонентной архитектуры, однотипности доступа к разнообразным базам данных, начиная от плоских таблиц формата dBase и Paradox и кончая серверными СУБД. Во многом именно наличие таких продуктов стимулировало достаточно безболезненный перенос в архитектуру клиент сервер ряда информационных систем, модернизация которых иными средствами была бы сопряжена с большими трудовыми и материальными затратами.

Следует отметить, что современные тенденции развития инструментальных средств таковы, что актуальным становится не просто появление новых гибких и мощных средств разработки, а создание семейств таких продуктов с похожими средами и принципами создания приложений, что в целом повторяет появившуюся примерно 4 года назад идеологию формирования офисных пакетов (текстовый процессор + электронная таблица + настольная СУБД + презентационный пакет) вместо выпуска отдельных офисных приложений. Если рассматривать линию продуктов Inprise, то в данный момент на рынке средств разработки присутствуют Delphi и C++Builder, а также сходные по методам создания приложений и среде JBuilder, IntraBuilder, Visual dBase.

Сходство C++Builder и Delphi не является чисто внешним. C++Builder обладает компонентной архитектурой и создан на основе библиотеки визуальных компонентов Delphi ставшей за последние два года весьма популярной среди разработчиков. По этой причине этот продукт имеет общую с Delphi библиотеку классов, часть из которых написана на Obiect Pascal.

Это означает, что можно создавать общие проекты, используя оба средства разработки - и C++BuiIder, и Delphi. Части одного приложения могут быть созданы с помощью двух средств, и теперь к работе над проектом можно привлекать разработчиков, использующих как Delphi, так и C++. Во-вторых, и это очень важно, C++Builder может использовать компоненты, созданные для Delphi, а их за последние несколько лет создано огромное количество. Это богатство, накопленное разработчиками всего мира, сегодня способно удовлетворить самые причудливые запросы.

C++Builder 6 предоставляет программисту широкие возможности повторного использования кода не только за счет наличия библиотеки компонентов, но и за счет поддержки стандарта ActiveX, что позволяет встраивать в приложения ActiveX-компоненты как сторонних производителей, так и созданные собственноручно с помощью самого C++Builder.

Исходя из вышеприведенного, можно сделать вывод, что среда программированияC++Builder 6 идеально подходит для реализации темы работы.

3. РАЗРАБОТКА ИНФОРМАЦИОННОЙ СИСТЕМЫ

3.1 Разработка алгоритмов и технологии решения задач

Информация, необходимая для решения задач, поступает не единовременно. Очередность поступления данных в базу данных определяет предметная область и ее правила. Сведения о формах обучения, условиях обучения, факультетах, кафедрах, специальностях, учебных планах, дисциплинах и преподавателях заносятся в начале эксплуатационного цикла системы и корректируются по мере необходимости. Информация об учебных группах, студентах добавляются в начале каждого учебного года. Регулярно по мере необходимости заносится информация о посещаемости студентов. Благодаря информации, поступающей в таком порядке, можно решить основные задачи, поставленные в выпускной квалификационной работе.

Формы ввода - вывода, разработанные для информационной системы, можно разделить на 4 группы:

- Формы списков.

- Формы справочников.

- Формы редактирования.

- Формы формирования отчета.

Форма справочника представляет собой форму с таблицей, в которую непосредственно можно вводить данные. Данные формы применяются для ввода данных в таблицы находящихся на нулевом уровне ИЛМ. Примером формы справочника является форма для ввода видов занятий в ЛНУ имени Тараса Шевченко (рисунок 3. 1).

Форма списков тоже представляет собой форму с таблицей, однако редактирование и ввод новых данных непосредственно в таблицу запрещен (рисунок 3. 2).



Рис. 3. 1 - Макет формы справочника (с внесенными данными) «Предмет»

Рис. 3. 2 - Макет формы списка (с внесенными данными) «Факультет»

Форма редактирования посещаемости представляет собой форму с таблицей содержащей пропуски студентов (рисунок 3. 3). Отличие данной формы от формы списка заключается в наличии полей выборки элементов таблицы. Например, у формы «посещаемость за текущий месяц» имеются следующие поля выбора: код студента; предмет; дата.



Рис. 3. 3 - Макет формы редактирования посещаемости (с внесенными данными) «посещаемость за текущий месяц»

Формы формирования отчета необходимы для выбора параметров отчета (рисунок 3. 4). Например, форма «Список студентов в группе» предусматривает выбор группы, студенты которой будут входить в отчет. Также имеется возможность выбрать реквизиты студента, которые будут входить в отчет.

Рис. 3. 4 - Макет формы формирования отчета (с внесенными данными) «список студентов в группе»

3.2 Описание интерфейса системы

Перед началом работы системы, необходимо установить программное обеспечение (подробный алгоритм представлен в файле readme. txt). Для этого предстоит произвести ряд операций:

Запустить mysql-installer-community-5. 7. 10. 0. msi

Выбрать полную установку и произвести настройку сервера.

Установить mysql-connector-odbc-5. 1. 6-win32. msi

Зайти Панель управления-> Администратирование -> Источники данных (ODBC)

На вкладке «Пользователи DSN» нажать добавить и в списке выбрать «MySQL ODBC 5. 1 Driver»

Запустить Пуск-> MySQL-> MySQL Workbench 6. 3 CE

Дважды кликнуть по соеденению local instance MySQL57

Слева нажать Data Import/Restore

Поставить галку в «Import from Self-Conteined file»

Выбрать файл. sql (лежит в папке mydata).

Приложение готово к работе.

Для начала работы с приложением необходимо открыть файл Project. exe. При запуске на экране появляется главное окно (рисунок 3. 5).

Рис. 3. 5 - Главное окно

Все функции, возможные в информационной системе, вынесены в меню. В зависимости от полномочий пользователя состав меню отличается. В полный состав меню входит: Журнал, Контроль посещаемости, Расписание, Информация об учащихся, Информация о преподавателях, Аудитории.

Чтобы, к примеру, войти в раздел Расписание и внести соответствующие изменения, пользователь должен указать свой логин и ввести пароль (рисунок 3. 6). Это является своеобразной защитой от несанкционированного изменения информации в системе.

Рис. 3. 6 - Авторизация пользователя при выборе раздела меню

Авторизируясь, можно получить доступ к информации, выбрав из общей базы только те сведения, что необходимы в данный момент, например, выбрать конкретную группу из выпадающего списка (рисунок 3. 7).

Рис. 3. 7 - Выбор расписания для конкретной группы

В разделе меню Журнал можно вывести количество пропусков за каждый из выбранных предметов. Или же вывести полный список студентов университета с указанием пропусков за конкретный предмет (рисунок 3. 8)

Рис. 3. 8 - Окно раздела меню Журнал.

Раздел меню Контроль посещаемости предоставляет информацию о пропусках конкретного студента с указанием даты и предмета, либо позволяет выбрать для контроля один из предметов из выпадающего списка (рисунок 3. 9)

Рис. 3. 9 - Окно раздела меню Контроль посещаемости

С помощью раздела меню Информация об учащихся можно открыть информацию о данных конкретно выбранного студента, например о Верховцевой Марине Николаевне (рисунок 3. 10).

Рис. 3. 10 - Окно раздела меню Информация об учащихся

Соответственно раздел меню Информация о преподавателях выводит данные о выбранном преподавателе либо всем преподавательском составе (рисунок 3. 11).

Рис. 3. 11 - Окно раздела меню Информация о преподавателях

Категории для выбора предоставлены в виде выпадающих списков, что существенно облегчает работу пользователя с программой, ускоряет ее и минимизирует количество возможных ошибок, обусловленных человеческим фактором.

Раздел меню Аудитории предоставляет список аудиторий с указанием их месторасположения и названия (рисунок 3. 11). необходимый критерий выборки также может быть выбран из выпадающего списка, как и в вышерассмотренных окнах.

Рис. 3. 11 - Окно раздела меню Аудитории

3.3 Генерирование файла MySQL

На вкладке Connection главной панели инструментов программы Navicat Premium выбираем опцию MySQL. Впоявившемся диалоговом окнезаполнить поля: Connection Name, Host Name, Port, User Name, Password. Ставим флажок на опции «Сохранить пароль» (рисунок 3. 12).



Рис. 3. 12 - Установка авторизации связи

В окне Connection вызываем контекстное меню на названии только что установленной связи. В выпадающем меню выбираем пунктNew Database (рисунок 3. 13) и заполняем диалоговые поля DatabaseName, Character Set в вывалившемся окне.

Рис. 3. 13 - Установка новой базы данных

Соответствующая надпись тут же появится в окне Connection. Вызываем контекстное меню на структурном разделе Tables новой записи. В вывалившемся меню выбираем ImportWizard и указываем источник импортирования данных (рисунок 3. 14).

Рис. 3. 14 - Выбор источника импортирования данных

Аналогично в диалоговом режиме заполняем информацию об импорте данных, пройдя 7 основных шагов установки (рисунок 3. 15).

Рис. 3. 15 - Пример заполнения информацией форм для импортирования данных в новый файл.

На последнем, восьмом шаге установки, подтверждаем внесенные изменения и запускаем процесс импорта данных (рисунок 3. 16).

Рис. 3. 16 - Процесс импортирования данных из таблиц

Прогресс процесса отображается в динамической строке в нижней части окна. По завершении процесса в окне появляются соответствующие таблицы с базами данных (рисунок 3. 17). Убеждаемся в корректности проведенных действий опытным путем.

Рис. 3. 17 - Результат работы программы Navicat Premium

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

http: //www. luguniv. edu. ua/

http: //www. chair36. msiu. ru/science/science/articles/2/html/node21. html

Должностные инструкции секретаря и начальника учебной части.

Грекул В. И., Денишенко Г. Н., Коровкаина Н. Л Проектирование информационных систем. Курс лекций. Москва: Интернет-Университет Информационных технологий, 2005. -304с.

http: //www. manualsbase. com/ru/manual/174778/impact_driver/sybase/sybase_powerdesigner_xml/

http: //www. internet-law. ru/gosts/2589/

http: //bibliofond. ru/view. aspx? id=550564#1

http: //www. siurgtu. ru/

http: //www. vsu. ru/

Хомоненко А. Д., Цыганков В. М., Мальцев М. Г. Базы данных: Учебник для высших учебных заведений/Под ред. проф. А. Д. Хомоненко. - СПб. : КОРОНА принт, 2002. - 672с.

Рик Гринвальд, Роберт Стаковьяк, Гэри Додж, Дэвид Кляйн, Бен Шапиро, Кристофер Дж. Челья. Программирование баз данных Oracle для профессионалов = Professional Oracle Programming. - М. : «Диалектика», 2007. - 784 с.

Суэринг С., Конверс Т., Джойс П. PHP и MySQL. Библия программиста, 2-е издание = PHP 6 and MySQL 6 Bible - М. : «Диалектика», 2010. - 912 с.

Элисон Балтер. Microsoft Office Access 2007: профессиональное программирование= Alison Balter's Mastering Microsoft Office Access 2007 Development. - М. : «Вильямс», 2008. - 1296 c.

http: //bcb. fud. ru/bcb/Sreda/Borland/Bcb5/bcb5_2. shtml

http: //opensource. com. ua/contents/978531800598p. html

Гвоздева Т. В., Баллод Б. А. Проектирование информационных систем. Ростов-на-Дону «Феникс», 2009, - 512с.

Исакова А. И. Информационные технологии в экономике. Курс лекций. Часть 1, 2. - Томск: ТУСУР, каф. АСУ, 2001

Шупейко И. Г. Эргономическое проектирование систем: Учеб. -метод. Пособие/И. Г. Шупейко. -Минск: БГУИР, 2012, -92 с.

Раздорожный А. А. Охрана труда и производственная безопасность: Учебно-методическое пособие - Москва: Изд-во «Экзамен», 2005. - 512 с.

Федорович Г. В. Рациональная эпидемиология профессиональных заболеваний. - Saarbrucken, Deutschland: Palmarium Academic Publishing, 2014. - 343 с.

Гришагин В. М., Фарберов В. Я. Безопасность жизнедеятельности. Учебное пособие. Изд. 2-е. дополненное. - Томск: Изд. ТПУ. 2003. - 159 с.

Гришагин В. М., Фарберов В. Я. Сборник задач по безопасности жизнедеятельности. Учебно-методическое пособие. - Юрга: Изд. Филиала ТПУ, 2002. - 96 с.

Санитарные нормы СН 2. 2. 4/2. 1. 8. 562-96. Шум на рабочих местах, в помещениях жилых, общественных зданий и на территории жилой застройки.

Санитарно-эпидемиологические правила и нормативы СанПиН 2. 2. 2/2. 4. 1340-03. Гигиенические требования к персональным электронно-вычислительным машинам и организации работы.

Типовая инструкция по охране труда для пользователей персональными электронно-вычислительными машинами (ПЭВМ) в электроэнергетике. РД 153-34. 0-03. 2. 98-2001. - 96 с.

Шепеленко Г. И. Экономика, организация и планирование производства на предприятии. Учебное пособие для студентов экономических факультетов и вузов. 2-е изд., доп. и переработ. - Ростов-на-Дону: издательский центр «МарТ», 2000, - 544с

Алексеев М. В., Демидов П. Г., Ройтман М. Я., Агалаков Н. А. Основы пожарной безопасности. М., «Высшая школа», 1971. - 248 с.

Правила пожарной безопасности В Российской Федерации; Инфра-М, Москва 1994. - 96 с.

Методичніi рекомендацii до виконання квалiфiкацiйних робіт за напрямком 0403 «Системнi науки та кібернетика» зi спецiальностi «Інформатика» для всiх форм навчання/ Г. А. Могильний, В. Д. Сквiрський, Г. О. Козуб Держ. закл. «Луган. нац. ун-тiменi Тараса Шевченка», - Луганськ: «ЛНУ iменi Тараса Шевченка», 2012. -61 с.

ДСТУ 3008-95 Государственный стандарт Украины. Документация. Отчеты в сфере науки и техники. Структура и правила оформления.

ПРИЛОЖЕНИЕ

Листинг программы:

//---------------------------------------------------------------------------

// Основная форма

#include

#pragma hdrstop

#include «Unit3. h»

#include «Unit1. h»

#include «Unit2. h»

//---------------------------------------------------------------------------

#pragma package (smart_init)

#pragma resource «*. dfm»

TMainForm *MainForm;

//---------------------------------------------------------------------------

__fastcall TMainForm: : TMainForm (TComponent* Owner)

: TForm (Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button1Click (TObject *Sender)

{

Form1->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button2Click (TObject *Sender)

{ Form2->Edit1->Text = 2; //Если нажата кнопка «Контроль посещаемости»

Form2->Panel1->Visible = true; //Показать панель контроля

Form2->Panel2->Visible = false; //остальные скрыть

Form2->Panel3->Visible = false;

Form2->Panel4->Visible = false;

Form2->Panel5->Visible = false;

Form2->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button3Click (TObject *Sender)

{ Form2->Edit1->Text = 3; //Если нажата кнопка «расписание»

Form2->Panel2->Visible = true; //Показать панель расписания

Form2->Panel1->Visible = false; //остальные скрыть

Form2->Panel3->Visible = false;

Form2->Panel4->Visible = false;

Form2->Panel5->Visible = false;

Form2->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button4Click (TObject *Sender)

{

Form2->Edit1->Text = 4; //Если нажата кнопка «Информация об учениках»

Form2->Panel3->Visible = true; //Показать панель Информация об учениках

Form2->Panel1->Visible = false; //остальные скрыть

Form2->Panel2->Visible = false;

Form2->Panel4->Visible = false;

Form2->Panel5->Visible = false;

Form2->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button6Click (TObject *Sender)

{

Form2->Edit1->Text = 5; //Если нажата кнопка «Информация о преподавателях»

Form2->Panel4->Visible = true; //Показать панель Информация о преподавателях

Form2->Panel1->Visible = false; //остальные скрыть

Form2->Panel2->Visible = false;

Form2->Panel3->Visible = false;

Form2->Panel5->Visible = false;

Form2->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

void __fastcall TMainForm: : Button5Click (TObject *Sender)

{

Form2->Edit1->Text = 6; //Если нажата кнопка «Аудитории»

Form2->Panel5->Visible = true; //Показать панель Аудитории

Form2->Panel1->Visible = false; //остальные скрыть

Form2->Panel2->Visible = false;

Form2->Panel3->Visible = false;

Form2->Panel4->Visible = false;

Form2->Show () ;

MainForm->Hide () ;

}

//---------------------------------------------------------------------------

//---------------------------------------------------------------------------

//Форма контроля посещаимости, расписания, Инфо. о студентах, преподавателях и аудиториях

#include

#pragma hdrstop

#include «Unit1. h»

#include «Unit2. h»

#include «Unit3. h»

//---------------------------------------------------------------------------

#pragma package (smart_init)

#pragma resource «*. dfm»

TForm2 *Form2;

//---------------------------------------------------------------------------

__fastcall TForm2: : TForm2 (TComponent* Owner)

: TForm (Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : FormClose (TObject *Sender, TCloseAction &Action)

{

Form2->Hide () ; //при закрытии

MainForm->Show () ; //показывать основную форму

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox2Select (TObject *Sender)

{

ADOQuery1->SQL->Text =

«SELECT Студент. ФИО, Группа. Название, Пропуски. Дата_пропуска FROM (Группа RIGHT JOIN Студент ON Группа. Код_группы = Студент. Группа) RIGHT JOIN Пропуски ON Студент. Код_студ = Пропуски. Студент where Группа. Название like'« +

ComboBox2->Text + «% '«; //вывод списка прпусков

ADOQuery1->Active = true; //по выбранной группе

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox3Select (TObject *Sender)

{

Label16->Caption = ComboBox3->ItemIndex + 1;

ADOQuery1->SQL->Text =

«SELECT студент. ФИО, группа. название, предмет. название, пропуски. дата_пропуска FROM студент, группа, пропуски, предмет WHERE предмет. код like пропуски. предмет and группа. код_группы = студент. группа and пропуски. студент = студент. код_студ and пропуски. предмет like'« +

Label16->Caption +»% '«;

ADOQuery1->Active = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : DateTimePicker1Change (TObject *Sender)

{

ADOQuery1->SQL->Text =

«SELECT Студент. ФИО, Группа. Название, Пропуски. Дата_пропуска FROM (Группа RIGHT JOIN Студент ON Группа. Код_группы = Студент. Группа) RIGHT JOIN Пропуски ON Студент. Код_студ = Пропуски. Студент where Пропуски. дата_пропуска like'« +

DateTimePicker1->Date. DateString () + «'«; //вывод списка прпусков

ADOQuery1->Active = true; //выбранной даты

Edit1->Text = DateTimePicker1->Date. DateString () ;

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox1Change (TObject *Sender)

{ i++;

ADOQuery1->SQL->Text =

«SELECT студент. ФИО, группа. название, предмет. название, пропуски. дата_пропуска FROM студент, группа, пропуски, предмет WHERE предмет. код like пропуски. предмет and группа. код_группы = студент. группа and пропуски. студент = студент. код_студ and студент. фио like'« +

ComboBox1->Text + «% '«; //вывод списка пропусков

ADOQuery1->Active = true; //определенного студента

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox2Change (TObject *Sender)

{

ADOQuery1->SQL->Text =

«SELECT Студент. ФИО, Группа. Название, Пропуски. Дата_пропуска FROM (Группа RIGHT JOIN Студент ON Группа. Код_группы = Студент. Группа) RIGHT JOIN Пропуски ON Студент. Код_студ = Пропуски. Студент where Группа. Название like'« +

ComboBox2->Text + «% '«;

ADOQuery1->Active = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : FormShow (TObject *Sender)

{

int a = Edit1->Text. ToInt () ;

Form2->DBGrid1->Width = Form2->Width - 30; //подгон размеров грида

Form2->DBGrid1->Height = Form2->Height - 120; //под размер формы

switch (Edit1->Text. ToInt ()) { //в зависимости от того

//какая кнопка нажата на главной форме

case (2) :

{ //если нажата «Контроль посещаемости»

ADOQuery1->SQL->Text = «select ФИО from студент»;

ADOQuery1->Active = true; // автозаполнение списка ФИО студентов

while (! ADOQuery1->Eof) {

ComboBox1->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select название from группа»;

ADOQuery1->Active = true; // автозаполнение списка групп

while (! ADOQuery1->Eof) {

ComboBox2->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select название from предмет»;

ADOQuery1->Active = true; // автозаполнение списка предметов

while (! ADOQuery1->Eof) {

ComboBox3->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

}

case (3) : //если нажата «Расписание»

{ ADOQuery1->SQL->Text = «select ФИО from преподаватель»;

ADOQuery1->Active = true; // автозаполнение списка преподавателей

while (! ADOQuery1->Eof) {

ComboBox4->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select название from группа»;

ADOQuery1->Active = true; // автозаполнение списка групп

while (! ADOQuery1->Eof) {

ComboBox5->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select название from предмет»;

ADOQuery1->Active = true; // автозаполнение списка предметов

while (! ADOQuery1->Eof) {

ComboBox6->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select предмет. название, преподаватель. ФИО, группа. название, вид_занятия. название, аудитория. название, расписание. дата from расписание, предмет, преподаватель, группа, аудитория, вид_занятия where предмет. код = расписание. предмет and преподаватель. код = расписание. преподаватель and группа. код_группы = расписание. группа and вид_занятия. код = расписание. вид_занятия and аудитория. код = расписание. аудитория»;

ADOQuery1->Active = true;

}

case (4) : //если нажата «Информация об учениках»

{

ADOQuery1->SQL->Text = «select ФИО from студент»;

ADOQuery1->Active = true; // // автозаполнение списка студентов

while (! ADOQuery1->Eof) {

ComboBox7->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select название from группа»;

ADOQuery1->Active = true; // автозаполнение списка групп

while (! ADOQuery1->Eof) {

ComboBox8->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select ФИО, группа. название, зачетка, дата_рождения, адрес, телефон, пропуски from студент, группа where группа. код_группы = студент. группа»;

ADOQuery1->Active = true;

}

case (5) : //если нажата «Аудитории»

{

ADOQuery1->SQL->Text = «select название from аудитория»;

ADOQuery1->Active = true; // автозаполнение списка Аудиторий

while (! ADOQuery1->Eof) {

ComboBox9->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select * from аудитория»;

ADOQuery1->Active = true;

}

case (6) : //если нажата «Информация о преподавателях»

{ ADOQuery1->SQL->Text = «select преподаватель. ФИО from преподаватель»;

ADOQuery1->Active = true; // автозаполнение списка преподавателей

while (! ADOQuery1->Eof) {

ComboBox10->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select предмет. название from предмет»;

ADOQuery1->Active = true; // автозаполнение списка предметов

while (! ADOQuery1->Eof) {

ComboBox11->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select факультет. название from факультет»;

ADOQuery1->Active = true; // автозаполнение списка факультетов

while (! ADOQuery1->Eof) {

ComboBox12->Items->Add (DBGrid1->Fields[0]->AsString) ;

ADOQuery1->Next () ;

}

ADOQuery1->Close () ;

ADOQuery1->SQL->Text = «select ФИО, факультет. название, предмет. название, телефон from преподаватель, факультет, предмет where преподаватель. факультет = факультет. код_факультета and преподаватель. код = предмет. преподаватель «;

ADOQuery1->Active = true;

}

}

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : DateTimePicker2Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select предмет. название, преподаватель. ФИО, группа. название, вид_занятия. название, аудитория. название, расписание. дата from расписание, предмет, преподаватель, группа, аудитория, вид_занятия where предмет. код = расписание. предмет and преподаватель. код = расписание. преподаватель and группа. код_группы = расписание. группа and вид_занятия. код = расписание. вид_занятия and аудитория. код = расписание. аудитория and расписание. дата like '« + DateTimePicker2->Date. DateString () +»% '«;

ADOQuery1->Active = true; //показать расписание на выбранную дату

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : FormResize (TObject *Sender)

{

Form2->DBGrid1->Width = Form2->Width - 30; //подгон размеров грида

Form2->DBGrid1->Height = Form2->Height - 120; //при изменении размеров формы

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox4Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select предмет. название, преподаватель. ФИО, группа. название, вид_занятия. название, аудитория. название, расписание. дата from расписание, предмет, преподаватель, группа, аудитория, вид_занятия where предмет. код = расписание. предмет and преподаватель. код = расписание. преподаватель and группа. код_группы = расписание. группа and вид_занятия. код = расписание. вид_занятия and аудитория. код = расписание. аудитория and преподаватель. ФИО like '« + ComboBox4->Text +»% '«;

ADOQuery1->Active = true; // Показать расписание для выбранного преподавателя

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox5Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select предмет. название, преподаватель. ФИО, группа. название, вид_занятия. название, аудитория. название, расписание. дата from расписание, предмет, преподаватель, группа, аудитория, вид_занятия where предмет. код = расписание. предмет and преподаватель. код = расписание. преподаватель and группа. код_группы = расписание. группа and вид_занятия. код = расписание. вид_занятия and аудитория. код = расписание. аудитория and группа. название like '« + ComboBox5->Text +»% '«;

ADOQuery1->Active = true; // Показать расписание для выбранной группы

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox6Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select предмет. название, преподаватель. ФИО, группа. название, вид_занятия. название, аудитория. название, расписание. дата from расписание, предмет, преподаватель, группа, аудитория, вид_занятия where предмет. код = расписание. предмет and преподаватель. код = расписание. преподаватель and группа. код_группы = расписание. группа and вид_занятия. код = расписание. вид_занятия and аудитория. код = расписание. аудитория and предмет. название like '« + ComboBox6->Text +»% '«;

ADOQuery1->Active = true; // Показать расписание по определенному предмету

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox7Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, группа. название, зачетка, дата_рождения, адрес, телефон, пропуски from студент, группа where группа. код_группы = студент. группа and студент. ФИО like '« + ComboBox7->Text +»% '«;

ADOQuery1->Active = true; //показать информацию о выбранном студенте

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox8Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, группа. название, зачетка, дата_рождения, адрес, телефон, пропуски from студент, группа where группа. код_группы = студент. группа and группа. название like '« + ComboBox8->Text +»% '«;

ADOQuery1->Active = true; //показать информацию о студентах выбранной группы

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : DateTimePicker3Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, группа. название, зачетка, дата_рождения, адрес, телефон, пропуски from студент, группа where группа. код_группы = студент. группа and дата_рождения like '« + DateTimePicker3->Date. DateString () +»% '«;

ADOQuery1->Active = true; ////показать информацию о студентах по дате рождения

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox9Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select * from аудитория where название like '«+ ComboBox9->Text +»% '«;

ADOQuery1->Active = true; //Показать аудитории по выбранному виду занятия

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox10Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, факультет. название, предмет. название, телефон from преподаватель, факультет, предмет where преподаватель. факультет = факультет. код_факультета and преподаватель. код = предмет. преподаватель and ФИО like '«+ ComboBox10->Text +»% '«;

ADOQuery1->Active = true; //Показать иформацию о преподавателе по ФИО

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox12Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, факультет. название, предмет. название, телефон from преподаватель, факультет, предмет where преподаватель. факультет = факультет. код_факультета and преподаватель. код = предмет. преподаватель and факультет. название like '«+ ComboBox12->Text +»% '«;

ADOQuery1->Active = true; //Показать иформацию о преподавателе по факультету

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox11Change (TObject *Sender)

{

ADOQuery1->SQL->Text = «select ФИО, факультет. название, предмет. название, телефон from преподаватель, факультет, предмет where преподаватель. факультет = факультет. код_факультета and преподаватель. код = предмет. преподаватель and предмет. название like '«+ ComboBox11->Text +»% '«;

ADOQuery1->Active = true; //Показать иформацию о преподавателе по предету

}

//---------------------------------------------------------------------------

void __fastcall TForm2: : ComboBox3Change (TObject *Sender)

{

Label16->Caption = ComboBox3->ItemIndex + 1;

ADOQuery1->SQL->Text =

«SELECT студент. ФИО, группа. название, предмет. название, пропуски. дата_пропуска FROM студент, группа, пропуски, предмет WHERE предмет. код like пропуски. предмет and группа. код_группы = студент. группа and пропуски. студент = студент. код_студ and пропуски. предмет like'« +

Label16->Caption +»% '«;

ADOQuery1->Active = true;

}

//-------------------------------------------------------------------------

// Форма электронного журнала

#include <vcl. h>

#pragma hdrstop

#include «Unit1. h»

#include «Unit3. h»

//---------------------------------------------------------------------------

#pragma package (smart_init)

#pragma resource «*. dfm»

TForm1 *Form1;

class TMyDBGrid: public TDBGrid

{

public:

__property Row;

__property DataLink;

};

//---------------------------------------------------------------------------

__fastcall TForm1: : TForm1 (TComponent* Owner)

: TForm (Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1: : FormShow (TObject *Sender) //создание формы

{

Form1->DBGrid1->Width = Form1->Width - 30; //подгоняем размеры грида к

Form1->DBGrid1->Height = Form1->Height - 100; //размерам формы

Form1->ADOQuery1->SQL->Text = «select название from группа»;

Form1->ADOQuery1->Active = true; //автоматическое заполнение комбобокса списком доступных Групп

while (! Form1->ADOQuery1->Eof) { Form1->ComboBox1->Items->Add (Form1->DBGrid1->Fields[0]->AsString) ;

Form1->ADOQuery1->Next () ;

}

ComboBox3->Clear () ;

Form1->ADOQuery1->SQL->Text = «select Название from Предмет»;

Form1->ADOQuery1->Active = true; // для городов - филиалы

while (! Form1->ADOQuery1->Eof) { //автоматическое заполнение

Form1->ComboBox3->Items->Add (Form1->DBGrid1->Fields[0]->AsString) ;

Form1->ADOQuery1->Next () ; //комбобокса списком доступных предметов

}

Form1->ADOQuery1->SQL->Text =

«select код_студ, ФИО, Пропуски from Студент, Группа, предмет whereгруппа. Название like'« +

...