Лекция: Xstart, Ystart,
Xend, Yend: integer;
End;
· видача коефіцієнта дозволу по осях
GetAspectRatio(var компонента дозволу по осі Х, компонента дозволу по осі У:Word);
· видача кольору пікселя GetPixel(координата Х, координата У: Integer): word;
· видача координати Х курсор GetX: Integer;
· видача координати У курсору GetY: Integer;
· переміщення курсору за заданим прирощенням
MoveRel(прирощення по Х, прирощення по У: Integer);
· переміщення курсору в задану точку MoveTo(координата x, координата y: Integer);
· установка пікселя в задану точку
PutPixel(координата Х, координата У: Integer; код кольору: word);
· установка масштабу за координатами
SetAspectRatio(коефіцієнт по осі Х, коефіцієнт по осі У: word): word;
Робота з кольоровою гамою:
· заповнення області FloodFill(координата Х, координата У, колір границі: word);
· видача номера поточного фонового кольору GetBkColor: word;
· видача номера поточного кольору GetColor: word;
· видача апаратної палітри GetDefaultPalette( var палітра: PaletteType);
PaletteType визначений у модулі Graph таким чином:
PaletteType=record
Size: Byte;
Color: array[0..MaxColor] of ShortInt;
End;
· видача останнього шаблону заповнення
GetFillPattern(var образ заповнення: FillPatternType);
· запит поточного шаблону та кольору заповнення, які встановлені процедурами SetFillStyle та SetFillPattern
GetFillSettings(var інформація заповнення: FillSettingsType);
· видача максимального кольору в SetColor GetMaxColor: word;
· видача поточної палітри та її розміру GetPalette( var палітра: PaletteType);
· видача розміру таблиці палітри GetPaletteSize: Integer;
· зміна кольору палітри SetAllPalette( var палітра: PaletteType);
· встановлення поточного фонового кольору SetBkColor( колір: word);
· встановлення поточного кольору SetColor( колір: word);
· встановлення шаблону заповнення
SetFillPattern(образ: FillPatternType; колір: word);
· встановлення шаблону заповнення та кольору
SetFillStyle(заповнювач: word; колір: word);
· зміна одного кольору в палітрі SetPalette( номер кольору: word; колір: ShortInt);
· модифікація входів палітри для ІВМ 8514 і VGA
SetRGBPalette(номер кольору, значення червоного кольору, значення зеленого кольору, значення блакитного кольору: Integer);
Робота з текстом:
· видача поточних параметрів (шрифт, розмір, направлення, вирівнювання)
GetTextSetting((var текстова інформація: TextSettingsType);
Тип TextSettingsType визначений у модулі Graph таким чином:
TextSettingsType=record
Font: word;
Direction: word;
CharSize: word;
Horiz: word;
Vert: word;
End;
· інсталяція шрифту користувача InstallUserFont(ім’я файла шрифту: string): Integer;
· видача рядка у вихідний пристрій OutText(рядок тексту: string);
· видача рядка, починаючи з заданої точки
OutTextXY(координата х точки видачі тексту, координата у точки видачі тексту: Integer; текстовий рядок: string);
· реєстрація шрифту BGI RegisterBGIFont(шрифт: pointer): Integer;
· встановлення вирівнювання тексту
SetTextJustify( горизонтальне вирівнювання, вертикальне вирівнювання: word);
· встановлення поточного шрифту, стилю та розміру
SetTextStyle(шрифт, напрямок: word; розмір символу: word);
· зміна ширини та висоти символу
SetUserCharSize(множення Х, ділення Х, множення У, ділення У: word);
· видає висоту рядка в пікселях TextHeight(рядок тексту: string): word;
· видає ширину рядка в пікселях TextWidth(рядок тексту: string): word;
Робота з розмірами та типами ліній:
· видача поточного стилю лінії
GetLineSettings(var інформація про лінію: LineSettingsType);
Тип LineSettingsType визначений ув модулі Dos таким чином:
LineSettingsType=record
LineStyle: word;
Pattern: word;
Thickness: word;
End;
Забезпечується 5 стилів (константа=0 – неперервна лінія, 1 – лінія з крапок, 2 – штрихпунктирна, 3 – штрихова, 4 – визначена користувачем), а також два види товщини (1 – нормальна, 3 – товста).
· встановлення поточної ширини та типу лінії
SetLineStyle(тип лінії: word; образ:word; товщина:word);
· встановлення режиму виводу малюнка SetWriteMode(режим запису: Integer);
Робота з видачею у вікна на екрані і сторінки в пам’яті:
· очищення поточного пристрою виводу ClearDevice;
· очищення поточного вікна ClearViewPort;
· очищення активного вікна ClrScr;
· збереження бітового образу в пам’яті
GetImage(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer; var біт карта); Біт-карта визначається, як P€, де Р – вказівка на область необхідного розміру;
· видача параметрів поточного вікна і відсічення
GetViewSettings(var порт виводу: ViewPortType);
Модуль Graph визначає тип ViewPortType таким чином:
ViewPortType=record
x1, y1, x2, y2: integer;
Clip: Boolean;
End;
· видача кількості байтів запам’ятовування області
ImageSize(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer): word;
· вивід бітового образу
PutImage(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer; var біт карта; оператор співставлення образу: word);
Оператор зіставлення образу керує зіставленням фону та образу, що накладається, задається числом від 0 до 4:
0 – мнемоніка константи Normalput або CopyPut – заміщує образ;
1- XORPut – побітова операція XOR між екраном та образом;
2 – ORPut – побітова операція OR між екраном та образом;
3 – ANDPut – побітова операція AND між екраном та образом;
4 – NOTRPut — побітова операція NOT між екраном та образом;
· встановлення активної сторінки для виводу SetActivePage(сторінка: word);
· встановлення номера сторінки графіки SetVisualPage(сторінка: word);
· зміна розміру буфера графіки SetGraphBufSize(розмір буферу: word);
· встановлення поточного вікна для виводу
SetViewPort(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer; відсічення: Boolean);
Відсічення набуває значення True (константа ClipOn) та False (константа ClipOff), при виборі ClipOn зображення, що виводиться, відсікається по границях вікна;
Робота з драйверами, режимами:
· завершення роботи в графіці CloseGraph;
· перевірка техніки та визначення драйвера DetectGraph(var драйвер, режим:Integer);
· видача імені поточного драйвера GetDriveName: Integer;
· видача поточного режиму GetGraphMode: Integer;
· видача максимального номера режиму GetMaxMode: Integer;
· видача імені графічного режиму GetModeName(номер режиму: Integer): string;
· видача діапазонів значень режимів для заданого драйвера
GetModeRange(драйвер: Integer; var нижня границя, верхня границя: Integer);
· оновлення графічної системи за параметрами, позиціювання курсору GraphDefaults;
· видача рядка інформації про помилку для заданого ErrorCode
GraphErrorMsg(код помилки: Integer): string;
· видача помилкового коду для останньої графічної операції GraphResult: Integer;
· ініціалізація графічної системи
InitGraph(var номер драйвера: Integer; var режим графіки: Integer; шлях до драйверу: string);
· інсталяція нового драйвера
InstallUserDriver(ім’я: string; вказівка автодетектування: point): Integer;
· передача вказівки на драйвер RegisterBGIDriver(драйвер: point): Integer;
· оновлення текстового режиму RestoreCrtMode;
· встановлення системи в графічний режим та очищення екрану
SetGraphMode( режим: Integer).