Рабочие листы
к вашим урокам
Скачать
1 слайд
ГРАФИЧЕСКИЙ РЕЖИМ
Turbo Pascal 7.0
Джамалдинова А.Д
2 слайд
Графические операции
Система координат
Инициализация
Изображение точек
Изображение линий
Закрашенные фигуры
Вывод текста
3 слайд
Цвет линий и текста
SetColor(c)
Цвет текста
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
4 слайд
Экранная система координат
x
y
(0,0)
Пиксель
Экран
(639,0)
(0,479)
5 слайд
Инициализация (включение) графического режима
Путь к драйверу
InitGraph (gd,gm,p)
Графический драйвер (gd=9)
y
Режим (разрешение)
‘c:\trans\bp\bgi’
gm=0 - низкое (640x200)
gm=1 - среднее (640x350)
gm=2 - высокое (640x480)
6 слайд
Выключение графического режима
CIoseGraph
y
7 слайд
Изображение точек
Координаты
PutPixel (x, y, c);
Цвет
x
y
8 слайд
Нарисовать точку зеленого цвета в центре экрана
Program Primer;
Uses Graph;
Var Gd, Gm : Integer;
Begin
Gd:=9; Gm:=2;
InitGraph(Gd,Gm,’c:\trans\bp\bgi’);
PutPixel(320,240,2);
Readln;
CloseGraph;
End.
9 слайд
Изображение линий
Прямые линии
Цвет линии
Контур прямоугольника
Окружность
Дуга окружности
10 слайд
Отрезок прямой линии
Line (x1,y1, x2,y2)
11 слайд
Цвет линии
SetColor(c)
Цвет линии
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
12 слайд
Перемещение
текущего указателя
в точку с координатами (x,y)
MoveTo (x,y)
13 слайд
Контур прямоугольника
Rectangle(x1,y1,x2,y2)
14 слайд
Окружность
Circle (x, y, r)
r
15 слайд
Дуга окружности
Arc (x,y,nu,ku,r)
nu
ku
r
16 слайд
Закрашенные фигуры
Прямоугольник
Закраска произвольной фигуры
17 слайд
Закрашенный прямоугольник
Bar (x1,y1, x2,y2)
18 слайд
Закраска произвольной фигуры
F l o o d F i l l (x,y, b)
Цвет границы
Координаты внутренней точки
19 слайд
Вывод текста в графике
Стиль и цвет текста
Вывод текста
20 слайд
Стиль текста
Направление
SetTextStyle(s, d, r)
Стиль
Размер
0 - побитовый
1 - тройной
2 - малый
3 - гротесковый
4- готический
0 - горизонтально ()
1 - вертикально ()
1..10
21 слайд
Цвет текста
SetColor(c)
Цвет текста
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
22 слайд
Вывод текста
OutTextXY(x, y,s)
Координаты
Текст
Тип - string
Рабочие листы
к вашим урокам
Скачать
6 656 056 материалов в базе
Настоящий материал опубликован пользователем Джамалдинова Асият Джамалдиновна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс повышения квалификации
36 ч. — 180 ч.
Курс профессиональной переподготовки
600 ч.
Курс повышения квалификации
36/72 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.