|
|
|
Константы
|
Константы задания драйверов и режимов работы | |||
|
const |
|||
|
Detect = |
0; |
||
|
CGA = |
1; |
||
|
MCGA = |
2; |
||
|
EGA = |
3; |
||
|
EGA64 = |
4; |
||
|
EGAMono = |
5; |
||
|
IBM8514 = |
6; |
||
|
HercMono = |
7; |
||
|
ATT400 = |
8; |
||
|
VGA = |
9; |
||
|
PC3270 = |
10; |
||
|
CurrentDriver = -128 ; |
{Передается в GetModeRange} | ||
|
CGAC0 = 0; |
{320x200; |
палитра 0; 1 |
страница } |
|
CGAC1 = 1; |
{320x200; |
палитра 1 ; 1 |
страница } |
|
CGAC2 = 2; |
{320x200; |
палитра 2 ; 1 |
страница } |
|
CGAC3 = 3; |
{320x200; |
палитра 3; 1 |
страница } |
|
CGAHi = 4; |
{640x200; |
1 страница } |
|
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}
TriplexFont = 1;{Шрифт триплекс; файл TRIP.CHR}
SmallFont = 2;{Мелкий шрифт; файл LITT.CHR}
SansSerifFont= 3;{Прямой шрифт; файл SANS.CHR}
GothicFont = 4;{Готический шрифт; файл GOTH.CHR}
HorizDir = 0;{Горизонтальное направление}
VertDir = 1;{Вертикальное направление}
UserCharSize = 0;{Размер символа, определяемый пользователем}
LeftText = 0;{Указатель слева от текста}
CenterText = 1;{Указатель по центру текста}
RightText = 2;{Указатель справа от текста}
BottomText = 0;{Указатель снизу от текста}
CenterText = 1;{Указатель по центру текста}
TopText = 2;{Указатель сверху от текста}
Константы отсечения
const
ClipOn = True;{Отсекать изображение}
ClipOf£= False;{Игнорировать окно (не отсекать изображение)}
Константы для Bar3D
const
TopOn = True;{Рисовать вершину}
TopOff= False;{Не рисовать вершину}
Константы шаблона штриховки
const
EmptyFill=0;{Нет штриховки}
SolidFill=1;{Сплошная штриховка}
LineFill=2;{--- штриховка}
LtSlashFill=3;{/// штриховка}
SlashFill=4;{/// штриховка (толстыми линиями)}
BkSlashFill=5;{\\\ штриховка (толстыми линиями)}
LtBkSlashFill=6;{\\\ штриховка}
HatchFill=7;{+++ штриховка}
XHatchFill=8;{ххх штриховка}
InterleaveFill=9;{Штриховка в клетку}
WideDotFill =10;{Штриховка редкими точками}
CloseDotFill=11;{Штриховка частыми точками}
UserFill =12;{Штриховка задается пользователем}
Битовые константы
const
CopyPut = 0;{MOV}
XORPut = 1;{XOR}
OrPut = 2;{OR}
AndPut = 3;{AND}
NotPut = 4;{NOT}
Константа палитры
const
MaxColors=15;{Максимальное количество цветов}
|
|
|
|