Иллюстрированный самоучитель по Turbo Pascal

Константы

Значения ошибок, возвращаемые 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;
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.