 |
|
Процедура Rectangle
procedure Rectangle(Xl, Yl, X2, Y2: Integer);
Строит контур прямоугольника текущим цветом. Текущий цвет задается процедурой SetColor, текущие параметры линии – процедурой SetLineStyle, a режим построения линии – процедурой SetWriteMode.
X1, Y1 – координаты левого верхнего угла прямоугольника;
X2, Y2 – координаты правого нижнего угла прямоугольника (необходимо чтобы 0 <= X1 < X2 <= GetMaxX и 0 <= Y1 < Y2 <= GetMaxY).
Процедура SetAspectRatio
procedure SetAspectRatio(Xasp, Yasp: Word);
Меняет относительный масштаб изображения по горизонтали и вертикали.
Xasp, Yasp – задаваемые масштабы по горизонтали и вертикали.
Процедура SetBkColor
procedure SetBkColor(Color: Word);
Устанавливает цвет фона экрана.
Color - устанавливаемый цвет (соответствует номеру цвета в палитре или черный, если Color = 0).
Процедура SetCotor
procedure SetColor(Color: Word);
Устанавливает текущий цвет, которым будут изображаться контуры фигур и тексты.
Color - устанавливаемый цвет (номер цвета из палитры).
Процедура SetFillPattern
procedure SetFillPattern(Pattern:FillPatternType;Color:Word);
Задает произвольный орнамент, а также цвет для заполнения фигур.
Pattern – задаваемый пользователем орнамент.
Color – цвет заполнения фигур.
Процедура SetFillStyle
procedure SetFillStyle(Pattern: Word; Color: Word);
Задает стандартные орнамент и цвет заполнения фигур.
Pattern – задаваемый стандартный параметр;
Color – цвет заполнения фигур (номер цвета в палитре).
Процедура SetLineStyle
procedure SetLineStyle(LineStyle: Word; Pattern: Word;
Thickness: Word);
Задает текущие параметры линии (стиль, шаблон и толщину).
LineStyle – стиль линий;
Pattern – шаблон линии – задается только в случае, если LineStyle = UserBitLn; представляется в виде двухбайтового числа, каждый бит которого равен 1, если очередной пиксель следует высветить, и 0 – в противном случае;
Thickness – толщина линии.
Процедура SetPalette
procedure SetPalette(ColorNum: Word; Color: Shortint);
Меняет цвет одной компоненты в палитре.
ColorNum – номер компоненты палитры;
Color – задаваемый цвет.
Функция GetBKColor
function GetBKColor: Word;
Возвращает номер текущего цвета фона в палитре.
Функция GetColor
function GetColor: Word;
Возвращает номер цвета в палитре, заданного последней процедурой SetColor.
Функция GetMaxX
function GetMaxX: Integer;
Возвращает максимальную координату Х для текущего драйвера в текущем режиме.
Функция GetMaxY
function GetMaxY: Integer;
Возвращает максимальную координату Y для текущего драйвера в текущем режиме.
Функция GetPixel
function GetPixel(X, Y: Integer): Word;
Возвращает цвет пиксела с заданными координатами.
Функция GetX
function GetX: Integer;
Возвращает координату X текущей позиции на экране относительно установленного графического окна.
Функция GetY
function GetY: Integer;
Возвращает координату Y текущей позиции на экране относительно установленного графического окна.
Коды цветов (для процедур SetPalette и SetAllPalette)
Таблица 2.1.
| Имя | Значение | Назначение |
| Black Blue Green Cyan Red Magenta Brown LightGray DarkGray LightBlue LightGreen LightCyan LightRed LighlMagenta Yellow White | Черный Синий Зеленый Голубой Красный Фиолетовый Коричневый Светло-серый Темно-серый Светло-синий Светло-зеленый Светло-голубой Розовый Светло-фиолетовый Желтый Белый |
Коды типов линий для процедур GetLineStyle, SetLineSlyle и GetLineSettings
Таблица 2.2.
| Имя | Значение | Назначение |
| SolidLn DottedLn CenterLn DashedLn UserBitLn | Сплошная Пунктирная Штрихпунктирная Штриховая Заданная пользователем |
Толщины линий для процедур GetLineStyle, SetLineStyle и GetLineSettings
Таблица 2.3.
| Имя | Значение | Назначение |
| NormWidth ThickWidth | Нормальная Толстая |
Константы изображения параллелепипеда для процедуры Bar3D
Таблица 2.4.
| Имя | Значение | Назначение |
| TopOn TopOff | True False | Закрашивается верхняя грань He закрашивается верхняя грань |
Константы орнамента заполнения для процедур GetFillStyle и SetFillSlyle
Таблица 2.5.
| Имя | Значение | Назначение |
| EmptyFill SolidFill LineFill LtSlashFill SlashFill BkSlashFill LtBkSlashFill HatchFill XHatchFill InterleaveFill WideDotFill CloseDotFill UserFill | Заполнение цветом фона Однородное заполнение цветом Заполнение --- Заполнение /// Заполнение /// толстыми линиями Заполнение \\\ толстыми линиями Заполнение \\\ Заполнение клеткой Заполнение косой клеткой Заполнение частой сеткой Заполнение редкими точками Заполнение частыми точками Заполнение определяется пользователем |