Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.

Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему Модуль GraphABC

Содержание

Подключение дополнительных библиотекДля работы в графическом режиме необходимо подключение модуля GraphABC. Первой инструкцией программы должна быть инструкция uses GraphABC;ВведениеГраф. примитивыЦвет--стильТекстЛитература
ВведениеГраф. примитивыЦвет--стильТекстЛитератураГрафика в PascalABC Подключение дополнительных библиотекДля работы в графическом режиме необходимо подключение модуля GraphABC. Первой Графический режимГрафический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали и Управление экраномSetWindowWidth(w) – Устанавливает ширину графического окна; SetWindowHeight(h) - Устанавливает высоту графического окна; ВведениеГраф. примитивыЦвет--стильТекстЛитература Очистка графического окнаClearWindow; - очищает графическое окно белым цветом.ClearWindow(color); - очищает графическое Графические примитивыТочкаЛинияПрямоугольник ОкружностьЭллипсСекторДугаВведениеГраф. примитивыЦвет--стильТекстЛитература ТочкаSetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом colorprogram tochka;uses GraphABC;beginSetPixel(300,200,clred);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература(300, 200) ЛинииLineTo(x,y) - рисует отрезок от текущего положения пера до точки (x,y); координаты ЛинииLine(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом в Используемые цветаRandom(16777215) – случайный цвет из всей палитры цветов ПаскаляВведениеГраф. примитивыЦвет--стильТекстЛитература Цвет линииSetPenColor(color) - устанавливает цвет пера, задаваемый параметром color.Program liniay;uses GraphABC;begin setpencolor(clred); line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература Толщина линииSetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям. Program liniay;uses GraphABC;beginsetpenwidth(20);setpencolor(clred);line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература ТреугольникРисуется процедурами Line(x1,y1,x2,y2); LineTo(x,y); Program treugolnik;uses GraphABC;begin setpenwidth(20); setpencolor(clred); line(300,100,500,300); lineto(100,300); lineto(300,100); floodfill(300,200,clgreen);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература ПрямоугольникRectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).Program pryamougolnik;uses GraphABC;beginRectangle(50,50,200,200);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература Заливка цветомFloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с точки Цвет и толщина контураЗадаются процедурами SetPenWidth(w); SetPenColor(color);Program pryamougolnik;uses GraphABC;begin SetPenColor(clred); SetPenWidth(20); Rectangle(50,50,200,200); FloodFill(100,100,clBlue);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература ОкружностьCircle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. ЭллипсEllipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных вершин.Program Дуга окружностиArc(x,y,r,a1,a2) - рисует дугу окружности с центром в точке (x,y) и СекторPie(x,y,r,a1,a2) - рисует сектор окружности, ограниченный дугой (параметры процедуры имеют тот же Вывод текста в графическое окноTextOut(x,y,’строка’); - выводит строку текста в позицию (x,y) Действия со шрифтомSetFontName(‘name’) – устанавливает наименование шрифта.SetFontColor(color) - устанавливает цвет шрифта.SetFontSize(sz) – Название шрифтаПо умолчанию установлен шрифт, имеющий наименование MS Sans Serif. Наиболее распространенные Стиль шрифтаЗадается именованными константами:fsNormal – обычный; fsBold – жирный; fsItalic – наклонный; Стиль шрифтаProgram text;uses GraphABC;Begin SetFontName('Arial'); SetFontSize(20); SetFontColor(clRed); TextOut(10,10,'обычный'); Пример 1ПримерВведениеГраф. примитивыЦвет--стильТекстЛитература Программа Упражнения
Слайды презентации

Слайд 2 Подключение дополнительных
библиотек
Для работы в графическом режиме необходимо

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

подключение модуля GraphABC.
Первой инструкцией программы должна быть инструкция


uses GraphABC;

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 3 Графический режим
Графический экран PasсalABC (по умолчанию) содержит 640

Графический режимГрафический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали

точек по горизонтали и 400 точек по вертикали.
Начало отсчета

– левый верхний угол экрана

400 точек

640 точек

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

(0;0)

х

у

Слайд 4 Управление экраном
SetWindowWidth(w) –
Устанавливает ширину графического окна;
SetWindowHeight(h)

Управление экраномSetWindowWidth(w) – Устанавливает ширину графического окна; SetWindowHeight(h) - Устанавливает высоту графического окна; ВведениеГраф. примитивыЦвет--стильТекстЛитература

-
Устанавливает высоту графического окна;
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 5 Очистка графического окна
ClearWindow; - очищает графическое окно белым

Очистка графического окнаClearWindow; - очищает графическое окно белым цветом.ClearWindow(color); - очищает

цветом.
ClearWindow(color); - очищает графическое окно указанным цветом.
program clear;
uses GraphABC;


begin
ClearWindow;
ClearWindow(clMoneyGreen);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 6 Графические примитивы
Точка
Линия
Прямоугольник
Окружность
Эллипс
Сектор
Дуга
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Графические примитивыТочкаЛинияПрямоугольник ОкружностьЭллипсСекторДугаВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 7 Точка
SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y)

ТочкаSetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом colorprogram tochka;uses GraphABC;beginSetPixel(300,200,clred);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература(300, 200)

цветом color
program tochka;
uses GraphABC;
begin
SetPixel(300,200,clred);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература
(300, 200)

Слайд 8 Линии
LineTo(x,y) - рисует отрезок от текущего положения пера

ЛинииLineTo(x,y) - рисует отрезок от текущего положения пера до точки (x,y);

до точки (x,y); координаты пера при этом также становятся

равными (x,y).

Program liniay;
uses GraphABC;
begin LineTo(300,200);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 9 Линии
Line(x1,y1,x2,y2) - рисует отрезок с началом в точке

ЛинииLine(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом

(x1,y1) и концом в точке (x2,y2).
Program liniay;
uses

GraphABC;
begin
line(100,50,500,250);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 10 Используемые цвета
Random(16777215) – случайный цвет из всей палитры

Используемые цветаRandom(16777215) – случайный цвет из всей палитры цветов ПаскаляВведениеГраф. примитивыЦвет--стильТекстЛитература

цветов Паскаля
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 11 Цвет линии
SetPenColor(color) - устанавливает цвет пера, задаваемый параметром

Цвет линииSetPenColor(color) - устанавливает цвет пера, задаваемый параметром color.Program liniay;uses GraphABC;begin setpencolor(clred); line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

color.
Program liniay;
uses GraphABC;
begin
setpencolor(clred);
line(30,30,400,350);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 12 Толщина линии
SetPenWidth(n) - устанавливает ширину (толщину) пера, равную

Толщина линииSetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям. Program liniay;uses GraphABC;beginsetpenwidth(20);setpencolor(clred);line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

n пикселям.
Program liniay;
uses GraphABC;
begin
setpenwidth(20);
setpencolor(clred);
line(30,30,400,350);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 13 Треугольник
Рисуется процедурами
Line(x1,y1,x2,y2); LineTo(x,y);
Program treugolnik;
uses GraphABC;
begin
setpenwidth(20);

ТреугольникРисуется процедурами Line(x1,y1,x2,y2); LineTo(x,y); Program treugolnik;uses GraphABC;begin setpenwidth(20); setpencolor(clred); line(300,100,500,300); lineto(100,300); lineto(300,100); floodfill(300,200,clgreen);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

setpencolor(clred);
line(300,100,500,300);
lineto(100,300);
lineto(300,100);
floodfill(300,200,clgreen);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 14 Прямоугольник
Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин

ПрямоугольникRectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).Program pryamougolnik;uses GraphABC;beginRectangle(50,50,200,200);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

(x1,y1) и (x2,y2).
Program pryamougolnik;
uses GraphABC;
begin
Rectangle(50,50,200,200);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 15 Заливка цветом
FloodFill(x,y,color) - заливает область одного цвета цветом

Заливка цветомFloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с

color, начиная с точки (x,y).
Program pryamougolnik;
uses GraphABC;
begin
Rectangle(50,50,200,200);
FloodFill(100,100,clBlue);
end.
Введение
Граф.

примитивы

Цвет--стиль

Текст

Литература

Слайд 16 Цвет и толщина контура
Задаются процедурами
SetPenWidth(w);
SetPenColor(color);
Program pryamougolnik;
uses

Цвет и толщина контураЗадаются процедурами SetPenWidth(w); SetPenColor(color);Program pryamougolnik;uses GraphABC;begin SetPenColor(clred); SetPenWidth(20); Rectangle(50,50,200,200); FloodFill(100,100,clBlue);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

GraphABC;
begin
SetPenColor(clred);
SetPenWidth(20);
Rectangle(50,50,200,200);
FloodFill(100,100,clBlue);
end.
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Слайд 17 Окружность
Circle(x,y,r) - рисует окружность с центром в точке

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

(x,y) и радиусом r.
Program circle;
uses GraphABC;
begin
Circle(500,200,100);

FloodFill(500,200,clred);
end.

x1,y1

r

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 18 Эллипс
Ellipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником

ЭллипсEllipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных

с координатами противоположных вершин.
Program oval;
uses GraphABC;
begin
Ellipse(50,50,200,350);
FloodFill(50+100,50+100,clred);
Ellipse(250,150,550,300);

FloodFill(250+100,150+100,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 19 Дуга окружности
Arc(x,y,r,a1,a2) - рисует дугу окружности с центром

Дуга окружностиArc(x,y,r,a1,a2) - рисует дугу окружности с центром в точке (x,y)

в точке (x,y) и радиусом r, заключенной между двумя

лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки).

Program duga;
uses GraphABC;
Begin
SetPenWidth(10);
Arc(300,250,150,45,135);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 20 Сектор
Pie(x,y,r,a1,a2) - рисует сектор окружности, ограниченный дугой (параметры

СекторPie(x,y,r,a1,a2) - рисует сектор окружности, ограниченный дугой (параметры процедуры имеют тот

процедуры имеют тот же смысл, что и в процедуре

Arc).

Program sector;
uses GraphABC;
begin
Pie(300,200,100,0,90);
FloodFill(310,190,clpink);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 21 Вывод текста в графическое окно
TextOut(x,y,’строка’); - выводит строку

Вывод текста в графическое окноTextOut(x,y,’строка’); - выводит строку текста в позицию

текста в позицию (x,y) (точка (x,y) задает верхний левый

угол прямоугольника, который будет содержать текст).

Program text;
uses GraphABC;
begin
TextOut(100,30,'Квадрат');
Rectangle(50,50,200,200);
FloodFill(55,55,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 22 Действия со шрифтом
SetFontName(‘name’) – устанавливает наименование шрифта.
SetFontColor(color) -

Действия со шрифтомSetFontName(‘name’) – устанавливает наименование шрифта.SetFontColor(color) - устанавливает цвет шрифта.SetFontSize(sz)

устанавливает цвет шрифта.
SetFontSize(sz) – устанавливает размер шрифта в пунктах.
SetFontStyle(fs)

- устанавливает  стиль шрифта.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 23 Название шрифта
По умолчанию установлен шрифт, имеющий наименование MS

Название шрифтаПо умолчанию установлен шрифт, имеющий наименование MS Sans Serif. Наиболее

Sans Serif.
Наиболее распространенные шрифты – это Times, Arial

и Courier New.
Наименование шрифта можно набирать без учета регистра.

Пример:
SetFontName(‘Times’);

Введение

Граф.
примитивы

Цвет--стиль

Операторы

Практика

Слайд 24 Стиль шрифта
Задается именованными константами:
fsNormal – обычный;
fsBold –

Стиль шрифтаЗадается именованными константами:fsNormal – обычный; fsBold – жирный; fsItalic –

жирный;
fsItalic – наклонный;
fsBoldItalic – жирный наклонный;
fsUnderline

– подчеркнутый;
fsBoldUnderline – жирный подчеркнутый;
fsItalicUnderline – наклонный подчеркнутый;
fsBoldItalicUnderline – жирный наклонный подчеркнутый.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 25 Стиль шрифта
Program text;
uses GraphABC;
Begin
SetFontName('Arial');
SetFontSize(20);

Стиль шрифтаProgram text;uses GraphABC;Begin SetFontName('Arial'); SetFontSize(20); SetFontColor(clRed); TextOut(10,10,'обычный'); SetFontStyle(fsItalic); SetFontColor(clBlue); TextOut(10,50,'наклонный');

SetFontColor(clRed);
TextOut(10,10,'обычный');
SetFontStyle(fsItalic);
SetFontColor(clBlue);
TextOut(10,50,'наклонный');

SetFontStyle(fsBold);
SetFontColor(clpink);
TextOut(10,90,'жирный');
SetFontStyle(fsUnderline);
SetFontColor(clblue);
TextOut(10,130,'подчеркнутый');
SetFontStyle(fsBoldItalicUnderline);
SetFontColor(clred);
TextOut(10,170,'жирный, наклонный, подчеркнутый');
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Слайд 26 Пример 1
Пример
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Пример 1ПримерВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 27 Программа

Программа

Слайд 28 Упражнения

Упражнения
  • Имя файла: modul-graphabc.pptx
  • Количество просмотров: 129
  • Количество скачиваний: 0
- Предыдущая Первый признак равенства треугольников
Следующая - Рисуем котёнка

Похожие презентации

Безопасная работа в социальных сетях Безопасная работа в социальных сетях 125
Windows XP Windows XP 119
Вероятностный подход к определению количества информации Вероятностный подход к определению количества информации 100
AQL functions for state AQL functions for state 124
Презентация по теме Знаковые системы Презентация по теме Знаковые системы 149
Районная научно-практическая конференция для учащихся 5-8 классов Шаг в науку Тема: Российские чемпионы и призёры Олимпиады в Сочи 2014 . проект. проект по информатике по теме Районная научно-практическая конференция для учащихся 5-8 классов Шаг в науку Тема: Российские чемпионы и призёры Олимпиады в Сочи 2014 . проект. проект по информатике по теме 133
Презентация по информатике на тему Работа с фрагментами текста Презентация по информатике на тему Работа с фрагментами текста 141
Документальное обеспечение криптографии Документальное обеспечение криптографии 107
Презентация Защита информации в информационных системах и в информационных технологиях управления организацией Презентация Защита информации в информационных системах и в информационных технологиях управления организацией 160
Безопасность в Web Безопасность в Web 102
Беспроводная система Dialog 3G Беспроводная система Dialog 3G 150
Технологии обработки графической информации Технологии обработки графической информации 131
Компьютерные вирусы. Антивирусные программы. Компьютерные вирусы. Антивирусные программы. 158
ИКТ – информационные коммуникационные технологии ИКТ – информационные коммуникационные технологии 122
Программное обеспечение компьютера. Операционная система и графический интерфейс ОС и приложений Программное обеспечение компьютера. Операционная система и графический интерфейс ОС и приложений 138
Аппаратная реализация компьютера Аппаратная реализация компьютера 184
Информация Информация 197
Ёлочка Ёлочка 171
Носители информации Носители информации 147
Эссе к дебатам и к ЕГЭ Эссе к дебатам и к ЕГЭ 128
Analysis and Design of Data Systems. Enhanced ER (EER) Mode. (Lecture 11) Analysis and Design of Data Systems. Enhanced ER (EER) Mode. (Lecture 11) 111
Системы счисления Системы счисления 146
Внеурочная деятельность, Игра по информатике Умники и умницы Внеурочная деятельность, Игра по информатике Умники и умницы 149
Тақырыбы: Компьютердің құрылғылары 7 сынып Тақырыбы: Компьютердің құрылғылары 7 сынып 159
Керування оперативною пам'яттю у процесорах архітектури х86. (Лекція 8) Керування оперативною пам'яттю у процесорах архітектури х86. (Лекція 8) 106
Презентация по информатике на тему Системы счисления Презентация по информатике на тему Системы счисления 135
Системы счисления, история и современность Системы счисления, история и современность 126
Прикладные протоколы сети Интернет Прикладные протоколы сети Интернет 180
Компьютерные вирусы Компьютерные вирусы 110
Методика расширения функций объектов Методика расширения функций объектов 116