Утверждаю
Ректор университета
_______________А.В. Лагерев
«______»_____________2007г.
Алгоритмические языки и программирование работа со стандартным графическим модулем
Методические указания
к выполнению лабораторной работы №8
для студентов очной формы обучения
специальности 230201 – "Информационные системы
и технологии"
Брянск 2007
УДК 004.43
Алгоритмические языки и программирование. Работа со стандартным графическим модулем: методические указания к выполнению лабораторной работы №8 для студентов очной формы обучения специальности 230201 – "Информационные системы и технологии". – Брянск: БГТУ, 2007. – 12 с.
Разработали: С.М. Рощин, к.т.н., доц.
Ю.А. Леонов, асс.
Научный редактор Ю.М. Казаков
Редактор издательства Л.И. Афонина
Компьютерный набор С.М. Рощин
Рекомендовано кафедрой «Компьютерные технологии и системы» БГТУ (протокол № от )
Темплан 2007г., п. 462
|
Подписано в печать Формат 60х84 1/16. Бумага офсетная. Офсетная печать. Усл. печ. л. 0,7 Уч. – изд. л. 0,7 Тираж 50 экз. Заказ Бесплатно |
Издательство брянского государственного технического университета, 241035, Брянск, бульвар 50-летия Октября, 7, БГТУ. 58-82-49
Лаборатория оперативной полиграфии БГТУ, ул. Харьковская, 9
1. Цель работы
Целью работы является изучение основных процедур и функций стандартного графического модуля Graph, а также овладение навыками перевода координат из декартовой системы в полярную систему.
Продолжительность работы – 4ч.
2. Теоретическая часть
2.1. Отображение информации в графическом режиме
После запуска среды программирования Borland Pascal 7.0 инициализируется текстовый режим. Для того чтобы использовать графические средства, предусмотренные в языке Pascal, программист должен определенным образом инициализировать режим работы графического адаптера. В графическом режиме работой графического адаптера управляет графический драйвер. Для всех существующих типов адаптеров фирма Borland разработала графические драйверы (они имеют расширение *.bgi и находятся на диске в одноименном подкаталоге).
Любая информация при работе в графическом режиме на экране монитора представлена совокупностью светящихся точек – пикселей, которые определяются цветом, и координатами – положением относительно левого верхнего угла экрана с координатами (0,0).
Графический адаптер может работать в нескольких графических режимах, каждому из которых соответствует свой формат изображения, т. е. разрешающая способность (количество пикселей по горизонтали и вертикали) экрана и набор используемых цветов. Для стандартного графического режима VGA разрешающая способность экрана равна 640x480 точек (ширина х высота), количество цветов – 16.
2.2. Инициализация графического режима
Необходимые процедуры и функции для работы с графикой собраны в стандартном модуле Graph.
Инициализация графики производится с помощью процедуры InitGraph, которая имеет вид:
InitGraph(драйвер, режим, путь);
Драйвер – переменная целого типа, определяющая тип драйвера. Процедура загружает драйвер в оперативную память и переводит адаптер в графический режим работы. Тип драйвера должен соответствовать типу графического адаптера. Для указания типа драйвера в модуле предопределены следующие константы: Detect, CGA, EGA, VGA и др.
Режим – переменная целого типа, задающая режим работы графического адаптера. Многие адаптеры могут работать в нескольких режимах. Если переменной драйвер присвоено значение Detect, процедура InitGraph сама определит необходимый драйвер и подберет наилучший режим (т.е. задавать номер режима в данном случае не требуется).
Путь – путь к каталогу, в котором находится файл драйвера графического режима. Если путь неуказан, то файл драйвера ищется в текущем каталоге (каталог, в котором находится исполняемый файл). Для графического режима VGA, являющегося режимом по умолчанию для большинства систем, стандартным драйвером является файл egavga.bgi, который находится в каталоге BGI корневого каталога среды программирования.
Пример процедуры инициализации графического режима:
Procedure Init;
Var
GrDriver, GrMode: Integer;
Begin
GrDriver:=Detect;
InitGraph(GrDriver, GrMode, ‘’);
If (GraphResult<>GrOk) Then begin
Writeln(‘При переходе в графический возникла ошибка’, GraphErrorMsg(GraphResult));
Halt(1);
End;
End;
GraphResult – функция, находящаяся в модуле Graph. Возвращает код ошибки последней графической операции.
GrOk – константа, значение которой возвращается функцией GraphResult при успешном выполнении последней графической операции.
GraphErrorMsg (код_ошибки) – функция, которая возвращает строку с полным названием ошибки по её коду.
После окончания работы с графикой необходимо закрыть графический режим. Делается это с помощью процедуры CloseGraph();