Результат работы программы

В данном примере реализована процедура отработки событий – нажатие клавиш PageDown и PageUp. Параметр v обеспечивает верхнюю границу пустого цикла задержки изображения. Предусмотрено ограничение по предельной скорости вращения кривошипа.

Анимация производится внутри процедуры в цикле, работающем до нажатия клавиши Esc или системной команды Close. Водило ползуна затирается не полностью, а только от правой границы ползуна до шарнирного сочленения с кривошипом. Места затирки опоры кривошипа восстанавливаются перерисовкой последней. Переменная rr определяет длину радиальной части кривошипа, а переменная ll – длину водила ползуна. Изображено можно увеличивать, используя параметр масштабирования a<=4. Ползун затирается справа и слева жирным карандашом в 10 пикселей.

4. Последовательность выполнения работы

1. Запустить среду Borland Pascal for Windows 7.0 на Рабочем столе или с диска D (d:\bpw\bpw.exe). Загружается редактор среды, в котором Options–Environment–Editor настраивается шрифт (Times New Roman Cyr, 10 pt). Работа с редактором имеет функции, похожие с другими Windows-программами.

2. Открываются демонстрационные программы (balls.pas, star.pas, kriv_.pas) для просмотра результатов. Далее один из файлов сохраняется на диске со своим именем для редактирования и изменения текста программы в соответствии с вариантом.

5. Требования к содержанию отчета

Отчет должен быть выполнен на магнитном носителе (дискете формата 3,5), в текстовом редакторе Word и должен содержать:

– титульный лист отчета с указанием учебного заведения, факультета, группы, фамилии, и., о. выполнившего работу и руководителя, номера задания, темы работы;

– индивидуальное задание и цель работы;

– словесное описание алгоритма решения;

– текст программы с комментариями (файл c расширением *.pas);

– результат (графическое изображение, с возможностью изменения его местоположения и масштабирования);

– ответы на контрольные вопросы.

6. Контрольные вопросы

1. Как выполнить изображение пламени.

2. Для какой цели предполагается использовать функцию GetDC.

3. Как остановить кривошип в программе?

4. Как выполнить мерцание звезды в процедуре wmPaint.

5. Что обеспечивает процедура SetupWindow.

6. Можно ли зафиксировать полигон функцией InvalidateRgn.

7. Почему необходимо выбирать жирный карандаш для затирки шлейфа в программе шары.

7. Методические рекомендации слушателям

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

1. Составить программу воспроизведения графики на экране монитора с использованием языковых средств Turbo Pascal и Оbject Pascal. Необходимо получить результат на экране.

2. Все задания выдаются по вариантам. Номер варианта предлагается преподавателем и регистрируется в учебном журнале.

3. После составления программы и устранения синтаксических ошибок необходимо запустить программу и получить результат. Результат может быть выведен на экран и скопирован в текстовый редактор (Word) с помощью переноса копии экран в буфер обмена (Windows) комбинацией клавиш <Alt+PrintScreen> . Тексты программ среды Borland Pascal копируются в редактор Word клавишей <Ctrl+Insert> – копирование в буфер обмена Windows, <Alt+Tab> – переключение задачи Windows).

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

– титульный лист отчета с указанием учебного заведения, факультета, группы, фамилии, и., о. выполнившего работу и руководителя, номера задания, темы работы;

– задание;

– словесное описание алгоритма решения;

– текст программы с комментариями;

– результаты;

– ответы на контрольные вопросы.