USES GRAPH;
С момента подключения модуля GRAPH программисту доступны все находящиеся в ней подпрограммы.
В первую очередь вызывается процедура InitGraph, которая устанавливает один из возможных графических режимов.
Формат процедуры :
InitGraph( Driver, Mode,’c:\tp7\bgi’);
В программе нужно описать переменные Driver и Mode :
var Driver, Mode : integer;
В разделе операторов, перед тем как написать первый графический оператор, следует выполнить :
Driver:=Detect; InitGraph(Driver, Mode,’c:\tp7\bgi’);
Перед окончанием программы следует закрыть видеорежим с помощью процедуры CloseGraph.
Установка цвета и стиля заполнения
SetColor(< константа определяющая цвет>:word); - установка цвета графического изображения.
SetBkColor(<константа определяющая цвет фона>:word); - установка цвета фона;
SetFillStyle(<константа стиля заполнения>:word; <константа цвета заполнения>:word); - установка способа закраски.
Таблица цветов
Константа | Цвет | |
Имя | Значение | |
Black | Черный | |
Blue | Синий | |
Green | Зеленый | |
Cyan | Бирюзовый | |
Red | красный | |
Magenta | малиновый | |
Brown | коричневый | |
LightGray | светло-серый | |
DarkGray | темно-серый | |
LightBlue | ярко-голубой | |
LightGreen | ярко-зеленый | |
LightCyan | ярко-бирюзовый | |
LightRed | ярко-красный | |
LightMagenta | ярко-малиновый | |
Yellow | желтый | |
White | белый |
Таблица констант для стандартных
Дата добавления: 2015-01-15; просмотров: 998;