Слайд 3Работа с графикой.
После запуска PascalABC, по умолчанию, запускается текстовый режим. Для
работы с графикой служит отдельное графическое окно. Чтобы его открыть, необходимо подключить модуль GraphABC. В этом модуле содержится обширный набор процедур и функций, предназначенных для работы с графическим экраном, а также некоторые встроенные константы и переменные, которые могут быть использованы в программах с графикой.
С их помощью можно создавать разнообразные графические изображения и сопровождать их текстовыми надписями. Подключение осуществляется в разделе описаний. Формат подключения модуля GraphABC:
uses GraphABC;
Слайд 5Образ любого изображения, высвечиваемого на экране монитора с помощью совокупности пикселей,
хранится в специальной области памяти – видеопамяти.
Реализация графического режима в ЭВМ обеспечивается с помощью видеоадаптера. Работу графического адаптера поддерживает драйвер адаптера.
Для того, что бы команда выполнилась необходимо указать команду и задать значения параметрам.
Слайд 6Некоторые команды библиотеки GraphABC
Line(x1,y1,x2,y2) Рисует отрезок из точки с координатами
(x1,y1) в точку с координатами (x2,y2)
LineTo(x, y) Рисует отрезок из текущей точки в точку с координатами (x, y) (соответствует команде сместиться_в с опущенным пером для исполнителя Чертежник)
Rectangle(x1,y1,x2,y2) Рисует контур прямоугольника со сторонами параллельными сторонамэкрана. Точки с координатами (x1, y1) и (x2, y2) определяют диагональные вершины прямоугольника.
RoundRect(x1,y1,x2,y2,w,h) Рисует прямоугольник со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев.
FillRect(x1,y1,x2,y2); Заливает прямоугольник, заданный координатами противоположныхвершин (x1,y1) и (x2,y2), цветом текущей кисти.
MoveTo(x, y) Переводит текущую точку в положение новое положение, в точку с координатами (x, y) (соответствует команде сместиться_в с поднятым пером для исполнителя Чертежник)
TextOut (x, y, text) Выводит Text на экран. Начало текста в точке с координатами (x,y) SetPixel(x,y,color)Закрашивает цветом color точку с координатами (x, y) SetPenColor(color)Задает цвет рисования линий. Параметр color – число в промежутке от 0 до 2563-1.
Слайд 9Некоторые команды библиотеки GraphABC.
Раздаточные листы
Модуль GraphABC содержит константы и функции
для работы с цветами. Тип ColorType, описывающий цвет, определен следующим образом:
type ColorType=integer;
Стандартные цвета задаются символическими константами:
Слайд 10Для управления цветом и фоном используются следующие процедуры и функции:
function RGB(r,g,b:
integer): ColorType; - возвращает целое значение, являющееся кодом цвета, который содержит красную, зеленую и синюю составляющие u1089 с интенсивностями R,G и B соответственно (R,G и B –целые в диапазоне от 0 до 255, причем, 0 соответствует минимальной интенсивности, 255 – максимальной).
function GetRed(color: ColorType): integer; - выделяет красный цвет интенсивностью (целое число от 0 до 255);
function GetGreen(color: ColorType): integer; - выделяет зеленый цвет интенсивностью (целое число от 0 до 255);
function GetBlue(color: ColorType): integer; - выделяет синий цвет интенсивностью (целое число от 0 до 255).