Информатика и выч. техника \ Программирование

Объектно-ориентированное программирование. Модуль Graph, страница 2

MCGAC0 = 0;

{320x200; палитра О; 1 страница}

MCGAC1 = 1;

{320x200; палитра 1; 1 страница}

MCGAC2 = 2;

{320x200; палитра 2; 1 страница}

MCGAC3 = 3;

{320x200; палитра 3; 1 страница}

MCGAMed = 4;

{640x200; 1 страница}

MCGAHi = 5;

{640x480; 1 страница}

EGALo = 0;

{640x200; 16 цветов; 4 страницы}

EGAHi = 1;

{640x350; 16 цветов; 2 страницы}

EGA64LO = 0;

{640x200; 16 цветов; 1 страница}

EGA64Hi = 1;

{640x350; 4 цвета; 1 страница}

EGAMonoHi= 3;

{640x350; 64К: 1 страница;256К:2 страницы}

HercMonoHi=0;

{720x348; 2 страницы}

ATT400CO = 0;

{320x200; палитра 0; 1 страница}

ATT400C1 = 1;

{320x200; палитра 1; 1 страница}

ATT400C2 = 2;

{320x200; палитра 2; 1 страница}

ATT400C3 = 3;

{320x200; палитра 3; 1 страница}

ATT400Med= 4;

{640x200; 1 страница}

ATT4QOHi = 5;

{640x400; 1 страница}

VGALo = 0;

{640x200; 16 цветов; 4 страницы}

VGAMed = 1;

{640x350; 16 цветов; 2 страницы}

VGAHi = 2;

{640x480; 16 цветов; 1 страница}

PC3270Hi = 0;

{720x350; 1 страница}

IBM8514LO= 0;

{640x480; 256 цветов}

IBM8514HI= 1;

{1024x768; 256 цветов}

Значения ошибок, возвращаемые GraphResult

const

grOk = 0;{Нет ошибок} 

grNoInitGraph = -1;{Графика не инициализирована} 

grNotDetected = -2;{Графическое устройство не обнаружено} 

grFileNotFound = -3;{Файл драйвера устройства не найден} 

grInvalidDriver= -4;{Неправильный файл драйвера устройства} 

grNoLoadMem = - 5;{Нет памяти для загрузки драйвера} 

grNoScanMem = - 6;{Нет памяти для просмотра областей}

grNoFloodMem = -7;{Нет памяти для закраски областей}

grFontNotFound = -8;{Файл шрифта не найден}

grNoFontMem = - 9;{Нет памяти для загрузки шрифта} 

grInvalidMode =-10;{Недопустимый графический режим} 

grError =-11;{Общая ошибка}

grIOerror =-12;{Ошибка графического ввода/вывода}

grInvalidFont =-13;{Неверный файл шрифта} 

grInvalidFontNum=-14;{Неверный номер шрифта}

Константы цвета

const

Black

= 0;{Черный}

Blue

= 1;{Синий}

Green

= 2;{Зеленый}

Cyan

= 3;{Голубой}

Red

= 4;{Красный}

Magenta

= 5;{Фиолетовый}

Brown

= 6;{Коричневый}

LightGray

= 7;{Светло-серый}

DarkGray

= 8;{Темно-серый}

LightBlue

= 9;{Ярко-синий}

LightGreen

= 10;{Ярко-зеленый}

LightCyan

= 11;{Ярко-голубой}

LightRed

= 12;{Розовый}

LightMagenta= 13;{Малиновый} 

Yellow  = 14;{Желтый}

White  = 15;{Белый}

Следующие константы цветов могут быть использованы с SetRGBPalette для выбора цветов на графическом адаптере IBM 8514:

const

EGABlack = 0;{Темныецвета}

EGABlue = 1;

EGAGreen = 2;

EGACyan = 3;

EGARed = 4;

EGAMagenta = 5;

EGALightGray = 7;

EGABrown = 20;

EGADarkGray = 56;{Светлыецвета}

EGALightBlue = 57;

EGALightGreen = 58;

EGALightCyan = 59;

EGALightRed = 60;

EGALightMagenta = 61;

EGAYellow = 62;

EGAWhite =63;

Константы типов и толщины линий

const

SolidLn=0;{Сплошная}

DottedLn=1;{Точечная}

CenterLn=2;{Штрихпунктирная}

DashedLn=3;{Пунктирная}

UserBitLn=4;{Тип определяется пользователем}

NormWidth=1;{Нормальная толщина}

ThickWidth= 3;{Тройная толщина}

Константы управления шрифтом

const

DefaultFont = 0;{Матричный шрифт 8x8}

Скачать файл