end;

n:=n+1;

end;

sum:=0;

for i:=1 to chel do

sum:=sum+strtofloat(stringgrid1.cells[pr+3,i]);

stringgrid1.cells[pr+3,i]:=floattostr(sum);

sum:=0;

for i:=1 to chel do

sum:=sum+strtofloat(stringgrid1.cells[pr+4,i]);

stringgrid1.cells[pr+4,i]:=floattostr(sum); 

sum:=0;

for i:=2 to 9 do  begin

sr1:=0;

for j:=1 to pr do

sr1:=sr1+strtofloat(stringgrid1.Cells[j,chel+i]);

sum:=sum+sr1;

stringgrid1.Cells[pr+2,chel+i]:=floattostr(sr1);

end;

stringgrid1.Cells[pr+4,chel+3]:=floattostr(RoundTo((strtofloat(stringgrid1.Cells[pr+2,chel+2])*1+strtofloat(stringgrid1.Cells[pr+2,chel+3])*0.96+strtofloat(stringgrid1.Cells[pr+2,chel+4])*0.9+strtofloat(stringgrid1.Cells[pr+2,chel+5])*0.74+strtofloat(stringgrid1.Cells[pr+2,chel+6])*0.55+strtofloat(stringgrid1.Cells[pr+2,chel+7])*0.45+strtofloat(stringgrid1.Cells[pr+2,chel+8])*0.4+strtofloat(stringgrid1.Cells[pr+2,chel+9])*0.32)/sum,-2));

stringgrid1.Cells[pr+4,chel+4]:=floattostr(RoundTo((strtofloat(stringgrid1.Cells[pr+2,chel+2])*10+strtofloat(stringgrid1.Cells[pr+2,chel+3])*9+strtofloat(stringgrid1.Cells[pr+2,chel+4])*8+strtofloat(stringgrid1.Cells[pr+2,chel+5])*7+strtofloat(stringgrid1.Cells[pr+2,chel+6])*6+strtofloat(stringgrid1.Cells[pr+2,chel+7])*5+strtofloat(stringgrid1.Cells[pr+2,chel+8])*4+strtofloat(stringgrid1.Cells[pr+2,chel+9])*3)/sum,-2));

end;

Если  сводная таблица сформирована, то пользователю предоставляется возможность сохранить ее в MS Excel, для этого служит кнопка «Сохранить в MS Excel». При нажатии этой кнопки открывается MS Excel с сформированной сводной таблицей, при необходимости ее можно вывести на печать или сохранить.

Код данной кнопки выглядит так:

procedure TForm1.Button11Click(Sender: TObject);

var x,c:integer;

Ap : Variant;

begin

Ap := CreateOleObject('Excel.Application');

Ap.Workbooks.Add;

Ap.Cells[4,((pr+3) div 2)]:='СВОДНАЯ ВЕДОМОСТЬ';

Ap.Cells[5,1]:='успеваемости  учащихся Пинского ГПТК легкой  промышленности';

Ap.Cells[6,((pr+3) div 2)]:='группа '+combobox1.Text+'                                         год обучения';

for x:=0 to StringGrid1.RowCount do

  for c:=0 to StringGrid1.ColCount do

  Ap.Cells[x+7,c+1] :=StringGrid1.Cells[c,x];

Ap.Cells[x+6,1]:='Средний  балл по группе';

Ap.Cells[x+6,6]:=floattostr(RoundTo(d,-2));

Ap.Cells[x+7,1]:='Мастера  п/о:';

Ap.Cells[x+8,1]:='Куратор  группы:';

Ap.Visible := True;

end;  

 

3. ПРОГРАММА РЕШЕНИЯ ЗАДАЧИ

     Для проектирования системы были использованы UML-диаграммы.

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

3.1 Логическая модель данных

 
 
 
 
 
 
 
 
 
 
 
 

Диаграмма состояния

 

Диаграмма классов 
 
 
 

 

Диаграмма деятельности

3.2 Физическая модель

     

Диаграмма компонентов 

     

Диаграмма кооперации 
 

 

4. ТЕСТИРОВАНИЕ ПРОГРАММЫ

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

Рис.1 Вид первоначального окна

     Для перехода в главное окно необходимо нажать кнопку «Начать работу». После  чего на форме активизируется элементы управления:

     

Рис.2 Вид главного окна 
 

     В данный момент пользователь может просматривать списки групп и добавлять новые.

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

     Вид формы после выбора группы примет следующий вид:

Рис.3 Вид окна после выбора группы

 

Рис.4 Сформированная сводная ведомость

5. ОПИСАНИЕ ПРОГРАММЫ

5.1 Вызов и загрузка

     Вызов осуществляется при помощи файла  «Project1.exe». Время загрузки зависит от параметров компьютера.

5.2 Входные данные

     Входные данные файлы с именем «имя группы.txt» изменяющие в самой программе. Книга1.xls файл Microsoft Excel создаваемый при помощи программы по нажатию кнопки «Сохранить в Excel».

5.3 Выходные данные

     Результат приведен в главном окне программы, а так же в файле Книга1.xls создаваемый в Microsoft Excel.

5.4 Инсталляция программы

      Для инсталляции программы запустите  «DRYDSetup.exe» будет вызвано окно установки следующего вида: 

 

      Нажимаем кнопку «Далее» и указываем, в какую папку установить окно представлено ниже.

 

     После появиться окно с уточнением пути:

 
 
 

     Жмем  кнопку «Установить» и появляется окно, что программа успешна установлена на компьютере.

 

     После нажатия на кнопку «Готово» программа  полностью готово к использованию.

5.5 Диалог с пользователем

     Диалог  с пользователем осуществляется с помощью главного окна программы «Документирования результатов учебной деятельности в учреждении образования».

5.6 Система помощи

     Для перехода в главное окно необходимо нажать кнопку «Начать работу».

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

     Для редактирования уже созданных групп  используется кнопка «Редактирование».

     Для сохранения изменений используется кнопка «Сохранить изменения».

     Для формирования сводной таблицы предусмотрена  кнопка «Сводная таблица», если сводная  таблица сформирована успешно, то пользователю предоставляется возможность сохранить ее в MS Excel, для этого служит кнопка «Сохранить в MS Excel». При нажатии этой кнопки открывается MS Excel с сформированной сводной таблицей, при необходимости ее можно вывести на печать или сохранить.

 

6. РАЗДЕЛ ОХРАНЫ ТРУДА

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

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

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

• организация рабочего места программиста;
• определение оптимальных условий труда программиста.

6.1 Описание рабочего места программиста

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

      При правильной организации рабочего места производительность труда инженера возрастает с 8 до 20 процентов.

      Согласно  ГОСТ 12.2.032-78 конструкция рабочего места  и взаимное расположение всех его элементов должно соответствовать антропометрическим, физическим и психологическим требованиям. Большое значение имеет также характер работы. В частности, при организации рабочего места программиста должны быть соблюдены следующие основные условия:

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

      Главными  элементами рабочего места программиста являются письменный стол и кресло. Основным рабочим положением является положение сидя. Рабочее место для выполнения работ в положении сидя организуется в соответствии с ГОСТ 12.2.032-78.

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

      Моторное  поле - пространство рабочего места, в  котором могут осуществляться двигательные действия человека.

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

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