Синтаксис:
procedure OutText{Текст: string);
Действие:
Выводит строку символов текст от текущего положения указателя вывода и перемещает указатель вывода в точку, расположенную за последним выведенным символом.
Цвет выводимых символов можно задать при помощи процедуры SetColor, а шрифт — SetTextStyle.
Синтаксис:
procedure MoveRel(dx:, dy: integer);
Действие:
Перемещает указатель вывода на dx и dy пикселов. Если значение параметра dx (dy) положительное, то указатель перемещается вниз (влево), если отрицательное, то — вверх (вправо).
Синтаксис:
procedure MoveTo(x,у: integer);
Действие:
Перемещает указатель вывода в точку с координатами х и у.
Синтаксис:
procedure Line(x2,yl: integer);
Действие:
Вычерчивает линию от текущего положения указателя вывода до точки, координаты которой указаны при вызове процедуры. Линия вычерчивается стилем, установленным процедурой SetLineStyle. Цвет линии можно задать при помощи процедуры SetColor.
Синтаксис:
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) ;
Действие:
Вычерчивает эллипс или дугу эллипса с центром в точке с координатами (к,у). Параметры УголНачала и Уголконца задают угловые координаты начальной и конечной точек линии эллипса, которая вычерчивается против часовой стрелки от начальной точки к конечной. Угловые координаты задаются в градусах, их значения возрастают против часовой стрелки. Параметры РадиусХ и Радиусу определяют горизонтальный и вертикальный радиусы эллипса. Линия эллипса или дуги вычерчивается в соответствии с установками процедуры setcoior.
Синтаксис:
DetectGraph(var Драйвер, Режим: integer);
Действие:
Проверяет графический адаптер и определяет, какой графический драйвер и режим используются.