Синтаксис:procedure Line(xl,yl,x2,y2: integer);Действие:Вычерчивает линию между двумя точками экрана, координаты которых указаны при вызове процедуры. Линия вычерчивается стилем, установленным процедурой SetLineStyle. Цвет линии можно задать при помощи процедуры setcoior.
Синтаксис:InitGraph(var Driver: integer; var Mode: integer; Path: string)Действие:Инициализирует графический режим. Параметр Driver определяет драйвер видеосистемы, параметр Mode — режим работы видеосистемы, параметр Path — каталог, где находится драйвер.
Синтаксис:function GraphResult: imteger;Возвращает результат (код ошибки) последней выполненной графической операции. Если операция выполнена успешно, функция возвращает ноль. Код ошибки выполнения графической операции устанавливают процедуры Bar, Bar3D, InitGraph, PieSlice, SetFillPattern, SetFillStyle, SetLineStyle, SetTextStyleи др.
Синтаксис:function GetX: integer; function GetY: integer;Действие:Возвращают координаты х и у указателя вывода.
Синтаксис:procedure Ellipse(х,у: integer; УголНачала, УголКонца: word;РадиусХ, РадиусУ: word) ;Действие:Вычерчивает эллипс или дугу эллипса с центром в точке с координатами (к,у). Параметры УголНачала и Уголконца задают угловые координаты начальной и конечной точек линии эллипса, которая вычерчивается против часовой стрелки от начальной точки к конечной. Угловые координаты задаются в градусах, их значения возрастают против часовой стрелки. Параметры […]
Синтаксис:DetectGraph(var Драйвер, Режим: integer);Действие:Проверяет графический адаптер и определяет, какой графический драйвер и режим используются.
Синтаксис:procedure Circle(х,у: integer; r: word);Действие:Вычерчивает окружность радиуса г с центром в точке с координатами (х,у).Цвет окружности можно задать при помощи процедуры Setcolor.
Синтаксис:procedure Bar3D(xI,yl,x2,y2: integer; Глубина: word; Граница: boolean);Действие:Вычерчивает параллелепипед. Параметры xl и yl задают положение левого верхнего, а х2 и у2 — правого нижнего угла ближней грани параллелепипеда. Параметр глубина задает расстояние между передней и задней гранями. Параметр граница определяет, нужно ли вычерчивать верхнюю границу задней грани параллелепипеда.Цвет и стиль закраски ближней грани параллелепипеда можно задать […]
Синтаксис:procedure Bar(xl,yl,x2,y2: integer);Действие:Вычерчивает закрашенный прямоугольник. Параметры xl и yl задают положение левого верхнего угла прямоугольника, х2 и у2 — правого нижнего. Используемый стиль и цвет заливки задается Процедурой SetFillStyle.
Синтаксис:procedure Arc(x,у: integer; УголНачала, УголКонца: integer; Радиус: integer);Действие:Вычерчивает дугу с центром в точке с координатами (х,у). Параметры УголНачала и УголКонца задают угловые координаты на-чальной и конечной точек линии дуги, которая вычерчивается против часовой стрелки от начальной точки к конечной. Угловые координаты задаются в градусах. Значение угловой координаты возрастает против часовой стрелки. Параметр Радиус задает радиус […]