Функции
Procedure GetBkColor; Word Возвращает текущий фоновый цвет.
Procedure GetColor; Word Возвращает текущий цвет.
Procedure GetDriverName; String Возвращает строку с именем текущего драйвера.
Procedure GetGraphMode: Integer Возвращает текущий графический режим.
Procedure GetMaxColor; Word Возвращает максимальный цвет, который можно задать в SetColor.
Procedure GetMaxMode: Integer Возвращает номер максимального режима текущего загруженного драйвера.
Procedure GetMaxX: Integer Возвращает максимальную горизонтальную координату графического экрана.
Procedure GetMaxY; Integer Возвращает максимальную вертикальную координату графического экрана.
Procedure GetModeName(ModeNum; Word) ; String Возвращает строку с именем указанного графического режима.
Procedure GetPaletteSize: Integer Возвращает размер таблицы палитры.
Procedure GetPixel (X, Y; Integer) : Word Возвращает цвет пикселя с координатами X,Y.
Procedure GetX: Integer Возвращает координату X текущего указателя.
Procedure GetY; Integer Возвращает координату У текущего указателя.
Procedure GraphErrorMsgtErrorCode: Integer): String Возвращает строку сообщения об ошибке для заданного кода ErrorCode.
Procedure GraphResult: Integer Возвращает код ошибки для последней графической операции.
Procedure ImageSize(X1, Y1, X2, Y2: Integer) Возвращает число байт, требуемое для сохранения прямоугольной области экрана.
Procedure InstallUserDriver(Name: String; AutoDetectPtr; Pointer): Integer
Устанавливает пользовательский драйвер устройства в таблицу драйверов устройств.
Procedure InstallUserFont (FontFileName: String): Integer Устанавливает новый шрифт, который не встроен в BGI систему.
Procedure RegisterBGIdriver (Driver: Pointer); Integer Регистрирует драйвер для графической системы.
Procedure RegisterBGIfont (Font: Pointer): Integer Регистрирует шрифт для графической системы.
Procedure TextHeight (TextStr: String) : Word Возвращает высоту строки в пикселах.
Procedure TextWidth(TextStr: String): Word Возвращает ширину строки в пикселах.
Function KeyPressed; Boolean Возвращает True, если на клавиатуре была нажата клавиша, и False в противном случае. Не задерживает исполнение программы.
Function ReadKey: char Читает символ с клавиатуры без эхоповтора на экране. Приостанавливает исполнение программы до нажатия на любую клавишу, кроме Shift, Ctrl, Alt, CapsLock, NumLock, ScrollLock.
Function WhereX: Byte Возвращает горизонтальную координату текущей позиции курсора относительно текущего окна.
Function WhereY: Byte Возвращает вертикальную координату текущей позиции курсора относительно текущего окна.
Процедуры
Procedure AssignCrt (var F: Text) Связывает с файловой переменной устройство CON (клавиатуру для ввода и экран для вывода).
Procedure ClrEol Удаляет все символы от текущей позиции курсора до конца строки без перемещения курсора.
Procedure ClrScr Очищает экран (окно) и помещает курсор в верхний левый угол.
Procedure Delay (D: word) Приостанавливает работу программы на указанное число D миллисекунд.
Procedure DelLine Удаляет строку, на которой находится курсор, и перемещает все строки ниже этой строки на строку вверх. Нижняя строка очищается.
Procedure GotoXY(X, Y; Byte) Перемещает курсор в нужное место экрана (окна).
Procedure Highvideo Устанавливает высокую яркость символов.
Procedure InsLine Вставляет пустую строку в позицию курсора. ,
Procedure LowVideo Устанавливает низкую яркость символов.
Procedure NormVideo Устанавливает нормальную яркость символов.
Procedure NoSound Выключает звуковой генератор.
Procedure Sound (F: word) Включает звуковой генератор. F - частота звука (Гц).
Procedure TextBackground (Color: Byte) Устанавливает цвет фона.
Procedure TextColor (Color: Byte) Устанавливает цвет символов.
Procedure TextMode (Mode: Word) Устанавливает нужный текстовый режим.
Procedure Window(X1, Y1, X2, Y2 : Byte) Определяет текстовое окно на экране. X1, Y1 - координаты левого верхнего угла, Х2, Y2 - правого нижнего угла.
