екрану в поточному режимі роботи відповідно по горизонталі і вертикалі.
Процедура SetViewPort. Встановлює прямокутне вікно на графічному екрані. Тема:
Procedure SetVievPort (X1, Y1, X2, Y2: Integer; ClipOn: Boolean);
Тут X1 .. Y2 - координати лівого верхнього (Х1, Y1) і правого нижнього (X2, Y2) кутів вікна; ClipOn - вираз типу Boolean, що визначає В«відсіченняВ» що не вміщається у вікні елементів зображення.
Процедура ClearDevice. Очищає графічний екран. Після звернення до процедури покажчик встановлюється в лівий верхній кут, а сам екран заповнюється кольором фону, заданим процедурою SetBkColor.
1.3 Лінії і точки
Процедура PutPixel. Виводить заданим кольором точку за вказаними координатами. Тема:
Procedure PutPixel (X, Y: Inteder; Color: word);
Тут X, Y - координати точки; Color - колір точки. p> Процедура Line. Викреслює лінію з вказаними координатами початку і кінця. Тема:
Procedure Line (X1, Y1, X2, Y2: Integer);
Тут X1 .. Y1 - координати початку (X1, Y1) і кінця (X2, Y2) лінії. Лінія викреслюється поточному стилем і поточним кольором.
Процедура SetLineStyle. Встановлює новий стиль викреслюються ліній. Тема:
Procedure SetLineStyle (Type, Pattern, Thick: Word);
Тут Type, Pattern, Thick - відповідно тип, зразок і товщина лінії. Тип лінії може бути створений за допомогою однієї з наступних констант:
Const
SolidLn = 0; (Суцільна лінія)
DottedLn = 1; (Точкова лінія)
CenterLn = 2; (Штрих-пунктирна лінія)
DashedLn = 3; (Пунктирна лінія)
UserBitLn = 4; (Візерунок лінії визначається користувачем)
1.4. Багатокутники
В
Процедура Rectangle. Викреслює прямокутник з вказаними координатами кутів. Тема:
Procedure Rectangle (X1, Y1, X2, Y2: Integer);
Тут X1 .. Y2 - координати лівого верхнього кута (X1, Y1) і правого нижнього (X2, Y2) кутів прямокутника. Прямокутник викреслюється з використанням поточного кольору і поточного стилю ліній.
В
1.5. Дуги, кола, еліпси
Процедура Circle. Викреслює коло. Тема:
Procedure Circle (X, Y: Integer; R: Word);
Тут X, Y - координати центру; R - радіус в пікселях. p> Окружність виводиться поточним кольором. Товщина лінії встановлюється поточним стилем, вид лінії завжди SolidLn (Суцільна). Процедура викреслює правильну коло з урахуванням зміни лінійного розміру радіусу залежно від його напрямки щодо сторін графічного екрану, тобто з урахуванням коефіцієнта GetAspectRatio. У зв'язку з цим параметр R визначає кількість пікселів в горизонтальному напрямку.
Процедура Arc. Креслить дугу кола. Тема:
Procedure Arc (X, Y: Integer; BegA, EndA, R: Word);
Тут X, Y - координати центру; BegA, EndA-відповідно початковий і кінцевий кути дуги; R - радіус.
Кути описуют...
