- •Приложение: Процедуры управления графическим режимом
- •8.1. Инициализация и закрытие графического режима
- •Переключение текст — графика — текст
- •Обработка ошибок
- •Система координат
- •Перемещение текущего указателя
- •Экран и окно в графическом режиме
- •Вывод точки
- •Вывод линии
- •8.3. Работа с текстом Вывод текста
- •Вывод численных значений
- •Установка шрифта.
- •Выравнивание текста
- •SetTextJustify(Horiz,Vert:word);
- •8.4. Установка цвета и палитры
- •8.5. Построение графических фигур Построение прямоугольников
- •Построение многоугольников
- •Построение дуг и окружностей
- •Атрибуты графических фигур Установка цвета и стиля.
- •Коэффициент сжатия.
- •8.6. Работа с фрагментами изображения
- •GetImage (XI, Yl, x2, y2: Integer; var BitMap);
- •Приложение Процедуры управления графическим режимом
- •Функции управления графическим режимом
- •Процедуры управления экраном, окном, страницей
- •Процедуры управления цветом и палитрой
- •Функции управления цветом и палитрой
- •Функции работы с точками
- •Процедуры работы с точками
- •Процедуры работы с линиями
- •Процедуры построения фигур из линий
- •Процедуры построения криволинейных фигур
- •Процедуры работы с текстом
- •Функции работы с текстом
- •Процедуры обмена с памятью
- •Функции обмена с памятью
Приложение Процедуры управления графическим режимом
CloseGraph; - останавливает работу графической системы.
DetectGraph (var Driver, Mode: integer); - проверяет наличие соответствующих аппаратных средств и определяет, какой графический режим и драйвер следует использовать.
GetModeRange (GraphDriver: integer; var LoMode, HiMode: integer); - для данного драйвера возвращает наименьший и наибольший номер графического режима.
GraphDefaults; - сбрасывает установленные для графических средств параметры. Возвращает текущий указатель в нулевую точку и устанавливает для графической системы параметры (область просмотра, палитру, фоновый и основной цвет, тип линии и образец линии, тип заполнителя, образец заполнителя и цвет заполнителя), принятые по умолчанию.
InitGraph (var GrDriver:integer; var Mode:integer; Path:string); - инициализирует графическую систему и переводит аппаратуру в графический режим.
RestoreCrtMode; - возвращение в текстовый режим.
SetGraphBufSize (BufSize:word); - изменение размера графического буфера.
SetGraphMode (Mode:integer); - устанавливает для системы графический режим и очищает экран.
Функции управления графическим режимом
GetGraphMode: integer; - получение номера текущего графического режима.
GetMaxMode: word; - возвращает для текущего загруженного драйвера максимальное значение номера режима.
GetModeName (Mode: integer): string; - возвращает строку, содержащую имя заданного графического режима Mode.
GraphErrorMsg (ErrorCode: integer): string; - для заданного кода ошибки (ErrorCode) возвращает строку сообщения об ошибке.
GraphResult: integer; - получение кода ошибки.
GetDriverName: string; - получение имени текущего драйвера.
InstallUserDriver (Name: string; AutoDetectPtr: pointer): integer; - включает в таблицу драйверов устройств BGI фирмы Borland драйверы, поставляемые другими фирмами
InstallUserFont (Name: String): integer; - устанавливает новый шрифт, не предусмотренный в системе фирмы Borland (BGI).
RegisterBGIdriver (Driver: pointer): integer; - регистрирует в графической системе загруженный пользователем или скомпонованный с программой драйвер формата BGI (формат фирмы Borland).
RegisterBGIfont (Font: pointer): integer; - регистрирует загружаемый пользователем или скомпонованный с программой шрифт формата BGI (фирмы Borland) в графической системе. В случае ошибки возвращаемое значение будет меньше 0. В противном случае возвращается внутренний номер шрифта.
Процедуры управления экраном, окном, страницей
ClearDevice; - очистка графического экрана.
ClearViewPort; - очищает текущую область просмотра (окно).
GetAspectRatio (var Xk, Yk: word); - возвращает действующую разрешающую способность графического экрана, с помощью которого можно вычислить коэффициент относительного удлинения (Xk,Yk).
GetViewSettings (var ViewPort: ViewPortType); - получение параметров текущего графического окна.
SetActivePage (Page: word); - устанавливает для графического вывода активную страницу. Страница, заданная параметром Page, становится активной. Весь графический вывод будет теперь направляться в эту страницу.
SetAspectRatio (Xasp, Yasp: word); - изменяет принятое по умолчанию значение коэффициента относительного удлинения.
SetViewPort (XI, Yl, X2, Y2: word; Clip: boolean); - задание размеров окна.
SetVisualPage (Page: word); - задание отображаемой на экране страницы.