Графические возможности языка PASCAL

ÄВВЕДЕНИЕ

ÄРождение Паскаля

ÄГрафические возможности языка Паскаль

ÄРабота в графическом видеорежиме. Общий обзор

ÄИнициализация графического режима

ÄУправление экраном и окнами

ÄУправление цветом и фоном

ÄПостроение простейших графических изображений

ÄУправление курсором

ÄВывод текстовой информации в графическом видеорежиме

ÄАлгоритм построения окон и статических объектов в них

ÄДеловая графика

ÄПостроение графиков  элементарных функций

ÄРеализация имитации движения графических объектов

ÄСПРАВОЧНЫЕ ТАБЛИЦЫ

ÄСправочные  материалы о языке Pascal

ÄТВОРЧЕСТВО УЧАЩИХСЯ

ÄЗадания для самостоятельного выполнения

ÄПостроение функций второго порядка

ÄЭТО ИНТЕРЕСНО

ÄЛИТЕРАТУРА

 

ÄКАРТА

Справочные таблицы

 

 

1. Процедуры модуля Graph

2. Функции модуля Graph

3. Цветовая шкала

Процедуры модуля Graph

Процедура

Формат

Действие

SetColor

SetColor(a: word);

Устанавливает цвет, которым будет осуществляться рисование

SetBkColor

SetBkColor(a: word);

Устанавливает цвет фона

SetFillStyle

SetFillStyle(a, b: word);
a -
стиль закраски, b - цвет

Устанавливает стиль и цвет закраски

SetLineStyle

SetLineStyle(a, b, c: word);
а - стиль линии, b- образец построения линии (может устанавливаться пользователем), с-толщина линии

Устанавливает стиль и толщину линии

SetTextStyle

SetTextStyle(a, b, c: word);

Устанавливает шрифт, стиль и размер текста

SetFillPattern

SetFillPattern(Pattern: FillpatternType; Color: word); Pattern - маска

Выбирает шаблон заполнения, определенный пользователем

ClearDivice

ClearDivice;

Очищает экран и устанавливает текущий указатель в начало

SetViewPort

SetViewPort(x1, y1, x2, y2: integer, Clip: boolean);

Устанавливает текущее окно для графического вывода

ClearViewPort

ClearViewPort

Очищает окно

PutPixel

PutPixel(a, b, c: integer);

Рисует точку цветом с в (x,y)

Line

Line(x1, y1, x2, y2: integer);

Рисует линию от (x1, y1) к (x2,y2)

Rectangle

Rectangle(x1, y1, x2, y2: integer);

Рисует прямоугольник с диагональю от (x1, y1) к (x2, y2)

Bar

Bar(x1, y1, x2, y2: integer);

Рисует закрашенный прямоугольник

Bar3D

Bar3D(x1, y1, x2, y2, d: integer; a: boolean);

Рисует трехмерную полосу (параллелепипед)

Circle

Circle(x, y, r: word);

Рисует окружность радиуса r с центром в точке (x, y)

Arc

Arc(x, y, a, b, R: integer);
a, b- начальный и конечный углы в градусах

Рисует дугу из начального угла к конечному, используя (x,y) как центр

Ellipse

Ellipse(x, y, a, b, Rx, Ry: integer);
a, b - начальный и конечный углы в градусах

Рисует эллиптическую дугу от начального угла к конечному, используя (x, y) как центр

FillEllipse

FillEllipse(x, y, Rx, Ry: integer);
Rx, Ry - вертикальная и горизонтальная оси

Рисует закрашенный эллипс

MoveTo

MoveTo(x, y: integer);

Передвигает текущий указатель в (x, y)

MoveRel

MoveRel(x, y: integer);

Передвигает текущий указатель на заданное расстояние от текущей позиции на x по горизонтали и на y по вертикали

OutText

OutText(text: string);

Выводит текст от текущего указателя

OutTextxy

OutTextxy(x, y: integer; text: string);

Выводит текст из (x, y)

Sector

Sector(x, y, a, b, Rx, Ry: integer);
a, b - начальный и конечный углы в градусах

Рисует и заполняет сектор эллипса

  Функции модуля Graph

GetBkColor

Возвращает текущий фоновый цвет

GetColor

Возвращает текущий цвет

GetX

Возвращает координату X текущей позиции

GetY

Возвращает координату Y текущей позиции

GetPixel

Возвращает цвет точки в (x, y)

  Цветовая шкала

Цвет

Код

Цвет

Код

Black – черный

0

DarkGray – темно-серый

8

Blue – синий

1

LightBlue – голубой

9

Green - зелёный

2

LghtGreen – ярко-зеленый

10

Gyan – бирюзовый

3

LightGyan – ярко-бирюзовый

11

Red – красный

4

LightRed – ярко-красный

12

Magenta – малиновый

5

LightMagenta – ярко-малиновый

13

Brown – коричневый

6

Yellow – желтый

14

LightGray – светло-серый

7

White – белый

15


Copyright © 2007 Cредняя школа №2 им. Н.П. Массонова г.Свислочь © Ярута Анжелина, Алла Синица