Процедуры графики в языке Turbo Pascal

Вид материала

Документы

Содержание 2. Процедуры графики в Turbo Pascal. Графические драйверы находятся в подкаталоге (папке) BGI. XHatchFill – сетчатка ( ). Можно указать цифру 8 13) Процедура установки текущего шрифта Font и его размера Size 3. Примеры программы на Turbo Pascal.

Подобный материал:

• Программирование на языке высокого уровня, 59.92kb.
• Курс «Программирование на языке Turbo Pascal 0» Цель курса, 19.6kb.
• Компоновать программы из отдельных частей отлаживать программы выполнять программы., 197.76kb.
• Задачи для изучающих программирование самостоятельно 30 Задания на лабораторную работу, 445.21kb.
• Конспект урока по информатике для десятого класса по теме «Условный оператор в Turbo, 32.44kb.
• Доманская Юлия Георгиевна г. Вилейка 2006г пояснительная записка, 74.95kb.
• Задачи работы Научиться создавать программы на языке Turbo Pascal с использованием, 598.05kb.
• Програма на мові Turbo Pascal, лінійні програми Команди галуження, вибору та мітки, 1485.97kb.
• Б. В. Ващук Turbo Pascal, 715.52kb.
• Алгоритмы создания фрактальных изображений в языке программирования Turbo Pascal, 101.97kb.

Процедуры графики в языке Turbo Pascal

Должны знать: Принцип построения графических изображений в компьютере, основные процедуры построения графических изображений.

Должны уметь: Выполнять построении простейших графических изображений в языке программирования.


1. Принципы построения графических изображений в компьютере


Изображение разбивается на отдельные элементы – пиксели (точки). Для каждой точки задаётся координаты, цвет и яркость в цифровом виде. Таким образом в компьютере будет храниться и обрабатываться двоичный код изображения. Графическая информация отображается на дисплее (мониторе).



В современных ПК используются лишь графические дисплеи, которые могут работать в двух режимах – текстовом (элемент экрана – знакоместо) и графическом (элемент экрана – пиксель).


Основная характеристика монитора – его тип: EGA, VGA, SVGA и т.д.


От типа монитора зависят: а) разрешающая способность (общее число пикселей на экране, например 640х480);

б) количество цветов. В современных ПК количество цветов может достигать более 2³².


Возможности графического дисплея определяются также электронной схемой управления – дисплейным адаптером (видеокартой). Основные его части: дисплейный процессор и видеопамять. Видеопамять хранит изображение. Дисплейный процессор – периодически выводит изображение на экран.





Обрабатывает изображение центральный микропроцессор.

2. Процедуры графики в Turbo Pascal.


Graph – модуль графических процедур.


GraphDrive или Gd – параметр для установки графического драйвера.

GraphMode или Gm – параметр для установки графического режима.

Например: Gd := Vga; Gm := VgaHi; (16 цветов, разрешение экрана - 640х480). Если установить Gd := Detect;, то получим автораспознавание графического драйвера и установка параметра Gm в этом случае не требуется.

Графические драйверы находятся в подкаталоге (папке) BGI.


1) Процедура инициализации графического режима:

InitGraph(Gd,Gm,’C:\PROG\TP\BGI’);


2) Процедура остановки графического режима :

CloseGraph;


3) Процедура установки цвета рисования:

SetColor(<цвет>);

цвет: можно задать целым число, например: 1 - синий и т.д.


4) Процедура установки цвета фона:

SetBkColor(<цвет>);


5) Процедура построения точки:

PutPixel(x,y);

x,y – координаты точки (целые числа):

0,0 x GetMaxX=640


y .


GetMaxY=480


6) Процедура построения отрезка:

Line(x₁,y₁,x₂,y₂); LineTo(x,y);

x₁ x₂

x₁,y₁,x₂,y₂ – целые числа

LineTo(x,y); - продолжа -

y₁ ет линию в точку (x,y).


y₂


7) Процедура построения прямоугольника:


Rectangle(x₁,y₁,x₂,y₂);

x₁ x₂

x₁,y₁,x₂,y₂ – целые числа


y₁


y₂

x₂,y₂


8) Процедура построения закрашенного прямоугольника:


Bar(x₁,y₁,x₂,y₂);

x₁ x₂

x₁,y₁,x₂,y₂ – целые числа


y₁


y₂

x₂,y₂


9) Процедура построения окружности:


Circle(x,y,R);

x

x,y – целые числа


y


R






10) Процедура выбора стиля линии:

SetLineStyle(<стиль>,0,<толщина>);

а) стиль:

SolidLn – сплошная ( );

DashedLn – пунктирная ( ).


б) толщина:

NormWidth – нормальная ( );

ThickWidth – жирная ( ).


11) Процедура выбора типа закраски:

SetFillStyle(<стиль>,0,<цвет>);

а) стиль:

SolidFill – сплошная закраска ( ). Можно указать цифру 1;




XHatchFill – сетчатка ( ). Можно указать цифру 8;


12) Процедура закраски:

FloodFill(x,y,<цвет>);

x,y – координаты точки, с которой начинается закраска; цвет – цвет границы области закраски.


13) Процедура установки текущего шрифта Font и его размера Size:

SetTextStyle(<Font >,<направление>,< Size>);

а) Font – вид шрифта можно указать целым число (от 0 до 4);

б) направление: 0- слева направо, 1 – снизу вверх;

в) Size – размер (целое число) определяет программист.


14) Процедура вывода текста:

OutTextXY(x,y,’<строка текста>’ или <строковая переменная>);


15) Процедура перемещения графического указателя в точку (x,y):

MoveTo(x,y);


16) Процедура перемещения графического указателя на расстояние dx и dy:

LineRel(dx,dy);


3. Примеры программы на Turbo Pascal.




Program gr1;

Uses Crt, Graph;

Var Gd,Gm,i: integer;


BEGIN

ClrScr;

Gd:=Detect;

InitGraph(Gd,Gm,’c:\prog\tp\bgi’);

For i:=0 to 15 do

begin

SetColor(i);

Line(0,20*i,640,20*i)

end;

Until keypressed;

CloseGraph;

END. Результат


4. Задание на дом:

с. 191 – 194

Задача:

1. Построить рисунок – конверт (прямоугольник размером 600х400 с двумя диагоналями.

2. Нарисовать 10 вертикальных отрезков заданного цвета.