Реферат: Основні відомості про алгоритмічну мову Turbo Pascal Графіка Pascal
а) Процедура:Line (x1, y1, x2, y2: integer);
x1, y1, x2, y2 – координати початкової і кінцевої точок лінії. Лінія креслиться поточним стилем і поточним кольором.
б) Процедура: LineTo (x, y: integer); будує лінію від точки поточного розміщення покажчика до точки з координатами (x,y).
в) Процедура:LineRel (dx, dy: integer); проводить відрізок від точки поточного розміщення на величину заданого приросту.
г) Процедура: SetLineStyle (Type, Pattern, Thich: word); встановлює стиль відображення ліній, де параметри – це відповідно тип, шаблон і товщина лінії. Тип лінії задається константою з таблиці 3:
Таблиця 3
Const | Значення | Характеристика |
SolidLn | 0 | Безперервна |
PottedLn | 1 | Пунктирна |
CenterLn | 2 | Штрих-пунктирна |
DashedLn | 3 | Штрихова |
UserBitLn | 4 | Задана |
Параметр Pattern тільки для ліній типу UserBitLn і може приймати значення від 1..65536, тобто 2 байта кожен біт (із 16 біт слова) може приймати значення 0 або 1 (піксель не світиться або світиться). Таким чином параметр Pattern задає відрізок ліній, довжиною 16 пікселів. Цей шаблон періодично повторюється по всій довжині ліній.
Параметр Thich приймає 2 значення:
Norm Width = 1
Thick WidTh = 3
Побудова прямокутників та паралелепіпедів.
1) Процедура Rectangle (x1, y1, x2, y2: integer); створює прямокутник з координатами x1, y1 – лівого верхнього кута і x2, y2 – правого нижнього кута. Область середини прямокутника не зафарбована і співпадає з кольором фону екрану. Для ліній прямокутника використовується поточний стиль ліній і колір (заданий).
2) Процедура Bar (x1, y1, x2, y2: integer); утворює прямокутник, внутрішня область якого заповнюється поточним стилем (тип і колір). Параметри процедури – відповідні координати лівого верхнього та правого нижнього кутів. Використовують для побудови гістограм, діаграм і т.п.
3) Процедура Bar3D (x1, y1, x2, y2 : integer; D3 : word; Top: boolean); відображає паралелепіпед (трьохмірне зображення) і зафарбовує його передню грань поточним стилем. X1..Y2 – координати лівого верхнього та правого нижнього кута передньої грані; D3 – трьохмірне зображення "глибина" у пікселях; Top – задає режим відображення верхньої грані. В модулі GRAPH для режиму Top визначені 2 константи:
Top On = TRUE – верхня грань відображається;
Top Off = FALSE – верхня грань не відображається.
Будова многокутників.
Многокутники можна зображати декількома способами: наприклад, за допомогою процедур Line, LineTo. Паскаль також містить процедури, які дозволяють будь-які многокутники.
1) процедура DrowPoly (n: word; var points); створює многокутник за допомогою ліній поточного кольору, стиля і товщини. Параметр n – кількість точок ламаної; points – змінна типу PointType , яка містить координати x, y точок ламаної.
В модулі GRAPH передбачений такий тип:
Type
PoinType = RECORD
x, y : integer;
end;
2) Процедура FillPoly (n : word; var points); схожа з попередньою, але навідміну від неї – малює замкнутий многокутник і зафарбовує його. Стиль і колір лінії і контуру задається процедурами SetLineStyle i SetColor, тип і колір заповнення – процедурою SetFillStyle.
3) Процедура FloodFill (x, y: integer; Border: word); служить для заповнення заданим стилем (SetFillStyle ) області в середині або зовні замкненого контуру. Параметри: x, y – координати точки в середині або зовні контуру; Border – задає колір контуру. Якщо контур незамкнений то буде заповнення всього екрану заданим стилем.
Побудова кола, дуги та еліпсу.
1) Процедура Circle (x, y: integer; r: word); зображає коло поточного кольору, товщини і вид лінії. Параметри x, y – координати центру кола, r – радіус у пікселях.
2) Процедура Arc (x, y: integer; StAngle, EndAngle, r: word); креслить дугу кола. Задається координатами центру кола, початковим та кінцевим кутами ( у градусах), які відраховуються від горизонтальної вісі проти часової стрілки; радіус кола у пікселях.