Информатика -продвинутый курс


         

о характере ошибки, соответствующей коду.


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

uses graph; var gd, gm, errorcod: integer;

begin

gd:=detect; initgraph(gd,gm,");

errorcod'=graphresult;

if errorcod <>grok then

begin

writeln('ошибка графики');

writeln(grapherrormsg(errorcod));

halt

end;

Процедура Halt останавливает выполнение программы и возвращает управление операционной системе.

Для формирования палитры используется система смешения красного, зеленого и синего цветов и изменения яркости луча. Цвет задается номером из списка цветов палитры в интервале 0 .. 15.

Процедуры sе1со1ог(<цвет>) и setbkcolor(<цвет>) устанавливают текущий цвет рисунка и цвет фона. При инициализации графики по умолчанию устанавливается черный фон и белый цвет рисунка.

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

Координаты точек воспринимаются в «экранной» системе координат, в которой начало - верхний левый угол экрана, ось «х» направлена вниз, ось «у» -направо. Максимальные значения координат определяются разрешимостью экрана (см. табл. 3.1).

Первый аргумент процедуры setlinestyle(a,b,t) а - стиль линии второй параметр b -«образец» - имеет значение 4, если а=4, в остальных случаях b=0; третий параметр t -толщина линии - может иметь значение 1 (нормальная толщина) или 3 (жирная линия).

Таблица 3.2

 Основные процедуры модуля Graph





































































































































































Заголовок процедуры



Геометрический смысл



putpixel(x,y,c)



Построить точку (х,у) цветом с



setlinestyle(a,b,t)



Установить стиль, образей и толщину линий



line(xl,yl,x2,y2)



Соединить две точки отрезком



rectangle(xl,yl.x2.y2)



Построить прямоугольник с заданными концами диагонали и





сторонами, параллельными осям координат



circle(x,y,r)



Построить окружность с центром (х,у) и радиусом г



arc(x,y,a,b,r)



Построить дугу окружности: a,b - начальный и конечный угол в





Градусах



ellipse(x,y,a,b,rx,ry)



Построить эллиптическую дугу: rx, rу - полуоси эллипса



setfillstyle(t,c)



Установить стиль закраски и ее цвет



fillellipse(x,y,rx,ry)



Построить закрашенный эллипс, используя цвет рисунка



floodfill(x,y,cg)



Закрасить фигуру до границы с цветом cg; (x,y) - внутренняя





точка фигуры



bar(xl,yl,x2,y2)



Построить столбец, используя тип и цвет закраски



pieslice(x,y,a,b.r)



Построить и закрасить сектор круга



sector(x,y.a,b,rx,ry)



Построить и закрасить эллиптический сектор



settextsiyle(f,n,d)



Установить шрифт, направление вывода и размер символа текста '



outtextxy(x,y,st)



Вывести строку st, начиная с точки (х,у)



outtext(st)



Вывести строку, начиная с точки расположения текущего указателя

<

Содержание  Назад  Вперед





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