Подпрограммы для работы с пером

Подпрограммы для работы с пером

Рисование линий осуществляется текущим пером. Доступ к свойствам текущего пера можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.

Процедуры и функции для доступа к свойствам пера сгруппированы парами: если Prop - имя свойства пера, то функция PenProp возвращает значение этого свойства, а процедура SetPenProp(p) устанавливает это свойство:

procedure SetPenColor(c: Color);

Устанавливает цвет текущего пера

function PenColor: Color;

Возвращает цвет текущего пера

procedure SetPenWidth(Width: integer);

Устанавливает ширину текущего пера

function PenWidth: integer;

Возвращает ширину текущего пера

procedure SetPenStyle(style: DashStyle);

Устанавливает стиль текущего пера. Константы стилей пера приведены здесь

function PenStyle: DashStyle;

Возвращает стиль текущего пера. Константы стилей пера приведены здесь

procedure SetPenMode(m: integer);

Устанавливает режим текущего пера

function PenMode: integer;

Возвращает режим текущего пера

function PenX: integer;

Возвращают x-координату текущей позиции рисования

function PenY: integer;

Возвращают y-координату текущей позиции рисования

Кроме этого, можно изменять свойства текущего пера через объект Pen.

Поделитесь на страничке

Следующая глава >

Похожие главы из других книг:

ЛЕКЦИЯ № 4. Подпрограммы

Из книги автора

ЛЕКЦИЯ № 4. Подпрограммы 1. Параметры подпрограмм В описании процедуры или функции задается список формальных параметров. Каждый параметр, описанный в списке формальных параметров, является локальным по отношению к описываемой процедуре или функции, и в модуле,


Стандартные подпрограммы

Из книги автора

Стандартные подпрограммы Общие подпрограммы procedure Swap<T>(var a, b: T); Меняет местами значения двух переменных function Milliseconds: integer; Возвращает количество миллисекунд с момента начала работы программы function MillisecondsDelta: integer; Возвращает количество миллисекунд с


Общие подпрограммы

Из книги автора

Общие подпрограммы procedure Swap<T>(var a, b: T); Меняет местами значения двух переменных function Milliseconds: integer; Возвращает количество миллисекунд с момента начала работы программы function MillisecondsDelta: integer; Возвращает количество миллисекунд с момента начала работы


Подпрограммы для работы с перечислимыми типами

Из книги автора

Подпрограммы для работы с перечислимыми типами procedure Inc(var i: integer); Увеличивает значение переменной i на 1 procedure Inc(var i: integer; n: integer); Увеличивает значение переменной i на n procedure Dec(var i: integer); Уменьшает значение переменной i на 1 procedure Dec(var i: integer; n: integer);


Подпрограммы для работы с динамическими массивами

Из книги автора

Подпрограммы для работы с динамическими массивами function Length(a: System.Array): integer; Возвращает длину динамического массива function Length(a: System.Array; m: integer): integer; Возвращает длину m-той размерности динамического массива (размерности нумеруются с нуля) procedure SetLength(var a: System.Array;


Подпрограммы для работы с символами и строками

Из книги автора

Подпрограммы для работы с символами и строками function Chr(a: byte): char; Преобразует код в символ в кодировке Windows function ChrUnicode(a: word): char; Преобразует код в символ в кодировке Unicode function OrdUnicode(a: char): word; Преобразует символ в код в кодировке Unicode function UpperCase(ch: char): char;


Подпрограммы для работы с файлами через файловые переменные

Из книги автора

Подпрограммы для работы с файлами через файловые переменные procedure Assign(f: FileType; name: string); Связывает файловую переменную f с именем файла name procedure AssignFile(f: FileType; name: string); Связывает файловую переменную f с именем файла name procedure Reset(f: Text); Открывает текстовый файл f


Подпрограммы для работы с файлами, каталогами и дисками

Из книги автора

Подпрограммы для работы с файлами, каталогами и дисками function ReadLines(path: string): sequence of string; Считывает строки из файла и превращает их в последовательность строк function ReadLines(path: string; en: Encoding): sequence of string; Считывает строки из файла с кодировкой en и превращает их в


Подпрограммы для работы с кистью

Из книги автора

Подпрограммы для работы с кистью Рисование внутренностей замкнутых областей осуществляется текущей кистью. Доступ к свойствам текущей кисти можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.Процедуры и функции для доступа к свойствам кисти


Подпрограммы для работы со шрифтом

Из книги автора

Подпрограммы для работы со шрифтом Вывод текста осуществляется текущим шрифтом. Доступ к свойствам текущего шрифта можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.Процедуры и функции для доступа к свойствам шрифта сгруппированы парами:


Подпрограммы для работы с графическим окном

Из книги автора

Подпрограммы для работы с графическим окном Доступ к свойствам графического окна можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.Процедуры и функции для доступа к свойствам окна сгруппированы парами: если Prop - имя свойства кисти, то функция


Подпрограммы для работы с координатами графического окна

Из книги автора

Подпрограммы для работы с координатами графического окна Доступ к свойствам координат графического окна можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.Процедуры и функции для изменения системы координат окна приведены ниже: procedure


Подпрограммы

Из книги автора

Подпрограммы Классический подход к повторному использованию состоит в том, чтобы создавать библиотеки подпрограмм. Здесь термин подпрограмма (routine) означает программный элемент, который может быть вызван другими элементами для выполнения некоторого алгоритма,


Атрибуты и подпрограммы

Из книги автора

Атрибуты и подпрограммы Любой абстрактный тип данных и POINT в частности характеризуется набором функций, описывающих операции применимые к экземплярам АТД. В классе, реализующем АТД, функции становятся компонентами (features) - операциями, применимыми к экземплярам класса.В


Ни словом сказать, ни пером описать: что такое хэштег и для чего он понадобился Фейсбуку? Евгений Золотов

Из книги автора

Ни словом сказать, ни пером описать: что такое хэштег и для чего он понадобился Фейсбуку? Евгений Золотов Опубликовано 18 марта 2013 Прошлая неделя была полна историй, крутившихся буквально вокруг нескольких букв: гремели X Window и Windows 8, S4 и RSS. Но разгоревшаяся аккурат к