Различия

Показаны различия между двумя версиями страницы.

--- ob:visual:draw:ru [2022/10/02 20:34]
iadenisov создано
+++ ob:visual:draw:ru [2025/07/04 11:18] (текущий)
iadenisov [Установка процедур для обратных вызовов]
@@ Строка 1: / Строка 1: @@
+Документация проекта [[https://visual.sfu-kras.ru|VISUAL / ONLINE OBERON]]
+====== Модуль Draw ======
 Создание графики и анимации на холсте HTML5.
-CONST
+CONST\\
- black, white, red, green, blue;
+ black, white, red, green, blue;\\
- Наиболее распространённые цвета.
+ Наиболее распространённые цвета.\\
-VAR
+VAR\\
- mouseX, mouseY, width, height: INTEGER;
+ mouseX, mouseY, width, height: INTEGER;\\
- focus: BOOLEAN;
+ focus: BOOLEAN;\\
+PROCEDURE **Start**
-PROCEDURE Start;
 Запуск рисования.
-PROCEDURE NoLoop;
+PROCEDURE **NoLoop**
 Отключение режима циклической перерисовки.
-PROCEDURE Loop;
+PROCEDURE **Loop**
 Включение режима циклической перерисовки.
-PROCEDURE Redraw;
+PROCEDURE **Redraw**
 Перерисовать холст.
-*** Установка процедур для обратных вызовов ***
-PROCEDURE SetPreloadProc(s: PROCEDURE);
+===== Установка процедур для обратных вызовов =====
+PROCEDURE **SetPreloadProc** (s: PROCEDURE)
 Установка процедуры для предварительной загрузки изображений и шрифтов.
-PROCEDURE SetSetupProc(s: PROCEDURE);
+PROCEDURE **SetSetupProc** (s: PROCEDURE)
 Установка процедуры для настройки модели.
-PROCEDURE SetDrawProc(d: PROCEDURE);
+PROCEDURE **SetDrawProc** (d: PROCEDURE)
-Установка процедуры для перерисовки.
+Установка процедуры для перерисовки. По умолчанию активируется режим циклической перерисовки, поэтому вызов будет происходить повторяясь многократно.
+PROCEDURE **SetPressedProc** (c: PROCEDURE)
-PROCEDURE SetPressedProc(c: PROCEDURE);
 Установка процедуры для обработки нажатия мыши.
-PROCEDURE SetReleasedProc(c: PROCEDURE);
+PROCEDURE **SetReleasedProc** (c: PROCEDURE)
 Установка процедуры для обработки отпускания мыши.
-PROCEDURE SetOutProc(c: PROCEDURE);
+PROCEDURE **SetOutProc** (c: PROCEDURE)
 Установка процедуры для события выхода курсора с холста.
-PROCEDURE SetOverProc(c: PROCEDURE);
+PROCEDURE **SetOverProc** (c: PROCEDURE)
 Установка процедуры для события появление курсора над холстом.
-PROCEDURE SetKeyPressedProc(c: PROCEDURE(code: INTEGER));
+PROCEDURE **SetKeyPressedProc** (c: PROCEDURE(code: INTEGER): BOOLEAN)
 Установка процедуры для события нажатия клавиш на клавиатуре.
-PROCEDURE SetKeyTypedProc*(c: PROCEDURE(ch: CHAR));
+PROCEDURE **SetKeyTypedProc** (c: PROCEDURE(ch: CHAR): BOOLEAN)
 Установка процедуры для события ввода литеры.
-*** Общие ***
-PROCEDURE SetFrameRate* (fps : INTEGER);
+===== Общие =====
+PROCEDURE **SetFrameRate** (fps: INTEGER)
 Устанавливает частоту обновления холста,
 путём вызова процедуры, установленной в SetDrawProc.
-PROCEDURE SetBackgroundRGB*(r, g, b: INTEGER);
+PROCEDURE **SetBackgroundRGB**(r, g, b: INTEGER)
 Устанавливает цвет фона холста в формате RGB.
-PROCEDURE SetBackground(argb : INTEGER);
+PROCEDURE **SetBackground** (argb: INTEGER)
 Устанавливает цвет фона холста.
-PROCEDURE SetSize(w, h : INTEGER);
+PROCEDURE **SetSize** (w, h: INTEGER)
 Устанавливает размеры холста.
-PROCEDURE FillRGBA(r, g, b: INTEGER; a: REAL);
+PROCEDURE **FillRGBA** (r, g, b: INTEGER; a: REAL)
 Задаёт цвет заполнения геометрических фигур в формате RGBA.
-PROCEDURE FillRGB(r, g, b: INTEGER);
+PROCEDURE **FillRGB** (r, g, b: INTEGER)
 Задаёт цвет заполнения геометрических фигур в формате RGB.
-PROCEDURE Fill(argb : INTEGER);
+PROCEDURE **Fill** (argb : INTEGER)
 Задаёт цвет заполнения геометрических фигур.
-PROCEDURE NoFill;
+PROCEDURE **NoFill**
 Отключает заполнение геометрических фигур цветом.
-PROCEDURE StrokeRGBA(r, g, b: INTEGER; a: REAL);
+PROCEDURE **StrokeRGBA** (r, g, b: INTEGER; a: REAL)
 Задаёт цвет линий и обводки геометрических фигур в формате RGBA.
-PROCEDURE StrokeRGB(r, g, b: INTEGER);
+PROCEDURE **StrokeRGB** (r, g, b: INTEGER)
 Задаёт цвет линий и обводки геометрических фигур в формате RGB.
-PROCEDURE Stroke(argb : INTEGER);
+PROCEDURE **Stroke** (argb : INTEGER)
 Задаёт цвет линий и обводки геометрических фигур.
-PROCEDURE NoStroke;
+PROCEDURE **NoStroke**
 Отключает обводку геометрических фигур.
-PROCEDURE StrokeWidth(width : INTEGER);
+PROCEDURE **StrokeWidth** (width: INTEGER)
 Задаёт толщину линии обводки.
-PROCEDURE Smooth;
+PROCEDURE **Smooth**
-PROCEDURE NoSmooth;
+PROCEDURE **NoSmooth**
-*** Геометрические фигуры ***
+===== Геометрические фигуры =====
+PROCEDURE **Point** (x0, y0: REAL)\\
+PROCEDURE **PointInt** (x0, y0: INTEGER)
-PROCEDURE Point(x0, y0: REAL);
 Рисует точку с координатами x0 и y0.
-PROCEDURE Line(x0, y0, x1, y1: REAL);
+PROCEDURE **Line** (x0, y0, x1, y1: REAL)\\
+PROCEDURE **LineInt** (x0, y0, x1, y1: INTEGER)
 Рисует линию из координаты x0, y0 в координату x1, y2.
-PROCEDURE Ellipse(x, y, w, h: REAL);
+PROCEDURE **Ellipse** (x, y, w, h: REAL)\\
+PROCEDURE **EllipseInt** (x, y, w, h: INTEGER)
 Рисует овал.
-PROCEDURE Rect(x, y, w, h: REAL);
+PROCEDURE **Rect** (x, y, w, h: REAL)\\
+PROCEDURE **RectInt** (x, y, w, h: INTEGER)
 Рисует квадрат.
-PROCEDURE RectRounded(x, y, w, h, r: REAL);
+PROCEDURE **RectRounded** (x, y, w, h, r: REAL)\\
+PROCEDURE **RectRoundedInt** (x, y, w, h, r: INTEGER)
 Рисует квадрат с закруглёнными углами.
-*** Геометрические фигуры с целыми аргументами ***
-PROCEDURE PointInt(x0, y0: INTEGER);
-PROCEDURE LineInt(x0, y0, x1, y1: INTEGER);
-PROCEDURE EllipseInt(x, y, w, h: INTEGER);
-PROCEDURE RectInt(x, y, w, h: INTEGER);
-PROCEDURE RectRoundedInt(x, y, w, h, r: INTEGER);
+===== Тексты =====
-*** Тексты ***
+PROCEDURE **String** (mystr: ARRAY OF CHAR; x, y: REAL; size: INTEGER)\\
+PROCEDURE **StringInt** (mystr: ARRAY OF CHAR; x, y, size: INTEGER)
+Рисует строку размера 'size' с началом в координатах 'x', 'y'.
+PROCEDURE **LoadFont** (name: ARRAY OF CHAR): Font
-PROCEDURE LoadFont(name: ARRAY OF CHAR): Font;
 Загружает шрифт по локальной ссылке не ресурс. Загрузка шрифта в профиле.
-PROCEDURE SetFont(f: Font);
+PROCEDURE **SetFont** (f: Font)
+Выбор шрифта для последующей орисовки текстов.
+PROCEDURE **StringWidth**(mystr: ARRAY OF CHAR; size: INTEGER): INTEGER
+Вычисляет ширину строки установленным шрифтом с заданным размером.
-PROCEDURE StringWidth*(mystr: ARRAY OF CHAR; size: INTEGER): INTEGER;
-PROCEDURE String(mystr: ARRAY OF CHAR; x, y: REAL; size: INTEGER);
-PROCEDURE StringInt(mystr: ARRAY OF CHAR; x, y, size: INTEGER);
+===== Изображения =====
-*** Изображения ***
+PROCEDURE **LoadImage** (name: ARRAY OF CHAR): Image
-PROCEDURE LoadImage* (name: ARRAY OF CHAR): Image;
+PROCEDURE **PlaceImage** (image: Image; x, y: REAL)
-PROCEDURE PlaceImage* (image: Image; x, y: REAL);
+===== Трансформация =====
-*** Трансформация ***
-PROCEDURE Translate(x, y: REAL);
+PROCEDURE **Translate** (x, y: REAL)
-PROCEDURE PushMatrix;
+PROCEDURE **PushMatrix**
-PROCEDURE PopMatrix;
+PROCEDURE **PopMatrix**
-PROCEDURE Rotate(angle : REAL);
+PROCEDURE **Rotate** (angle : REAL)

Инструменты пользователя

Инструменты сайта

Различия

Инструменты страницы