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; просмотров: 1113;
