Презентация, доклад по информатике Графика. ПаскальАВС(10 класс)

с графикой служит отдельное графическое окно.
Чтобы его открыть, необходимо подключить модуль GraphABC.

Формат подключения модуля GraphABC:
Uses GraphABC;

окна

ClearWindow; очищает экран белым цветом

ClearWindow(сolor); очищает экран указанным цветом

color
Line(x1,y1,x2,y2); рисует отрезок с началом в точке (х1,у1) и концом в точке (х2,у2)
LineTo(x,y); рисует отрезок из текущей точки в точку (х,у)
Rectangle(x1,y1,x2,y2); рисует контур прямоугольника, у которого левая верхняя вершина (х1,у1), а правая нижняя-(х2,у2)

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

равную n пикселям
SetBrushColor(color); устанавливает цвет кисти. Заливка кистью распространяется на замкнутый контур, описание которого следует за процедурой установки цвета кисти
FloodFill(x,y,color); закрашивает замкнутый контур. (х,у)- точка внутри контура
FillRect(x1,y1,x2,y2); закрашивает прямоугольник текущим цветом кисти

линия_ _ _ _ _ _

psDot-пунктирная линия . . . . . . . . .
psDashDot- штрихпунктирная линия _ . _ . _ . _ . _ .

psDashDotDot- штрих и 2 пунктира _ .. _ . . _ . . _ . .

psClear- отсутствие линии

координатами х,у позицию

SetFontColor(color); устанавливает цвет шрифта

SetFontSize(cz); устанавливает размер шрифта в пунктах

SetFontName(name); устанавливает наименование шрифта (Arial и т.д.)

жирный наклонный
fsUnderline - подчеркнутый
fsBoldUnderline - жирный подчеркнутый
fsItalicUnderline - наклонный подчеркнутый
fsBoldItalicUnderline - жирный наклонный подчеркнутый

– красный
clNavy –темно-синий
clGreen – зеленый
clBrown – коричневый
clBlue – синий
clSkyBlue – голубой
clYellow – желтый
clCream – кремовый

– ярко-красный
clMoneyGreen – цвет денег
clLtGray – светло-серый
clDkGray – темно-серый
clMedGray – серый
clSilver - серебристый

//ширина окна программы
SetWindowHeight(600); //высота окна программы
SetPenWidth(3); //толщина пера
SetFontSize(18); //размер шрифта
SetFontColor(clRed); //цвет шрифта
SetFontStyle(fsBold); //жирный стиль шрифта
TextOut(100,100,'Домик'); //текст

//цвет заливки окна
FillRect(300, 400,500,500); //процедура заливки окна
rectangle(300,400,500,500); //окно
Line(400,400,400,500); // окно
Line(300,450,500,450); //окно
Line(200,300,400,150); //крыша
Line(400,150,600,300); //крыша
Line(480,210,480,160); //труба
Line(480,160,520,160); //труба
Line(520,160,520,240); //труба
end.