Команды Pascal Abc


Работа с графикой в PascalABC
Август 28, 2018 – 20:22
PascalABC.NET 1.6.440

Графическое изображение, созданное в PascalABCПосле запуска PascalABC, по умолчанию, запускается текстовый режим. Для работы с графикой служит отдельное графическое окно.

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

С их помощью можно создавать разнообразные графические изображения и сопровождать их текстовыми надписями.

Подключение осуществляется в разделе описаний.

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

Uses GraphABC;

Графический экран PascalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали. Начало отсчета – левый верхний угол экрана. Ось x направлена вправо, а ось y –вниз. Координаты исчисляются в пикселях.

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

Управление графическим окном

Управление графическим окном

Процедуры рисования графических примитивов

Процедуры для работы с текстомПроцедуры, используемые для работы с цветом

Процедуры для работы с текстом

Цвета в PascalABC

Пример графической программы, рисующей изображение дома:

Program Domik; uses Graphabc; //подключение модуля GraphABC begin SetWindowWidth(800); //ширина окна программы SetWindowHeight(600); //высота окна программы SetPenWidth(3); //толщина пера SetFontSize(18); //размер шрифта SetFontColor(clRed); //цвет шрифта SetFontStyle(fsBold); //жирный стиль шрифта TextOut(100, 100, 'Домик'); //текст Rectangle(200, 300, 600, 600); //дом Circle(400, 225, 40); //круг SetBrushColor(clAqua); //цвет заливки окна 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.

Рисунок в PascalABC Цвета в PascalABC Рисунок   в PascalABC domok-2
Source: gospodaretsva.com
Похожие публикации