Действия с пером.

Function PenX:integer;

- возвращает текущее значение пера

Function PenY:integer;

- возвращает текущее значение пера

Procedure SetPenColor(color:integer);

- устанавливает цвет пера.

Function PenColor:integer;

- возвращает текущий цвет пера.

Procedure SetPenWidth(w:integer);

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

Function PenWidth:integer;

- возвращает ширину пера.

Procedure SetPenStyle(ps:integer);

- устанавливает стиль пера, заданным параметром ps.

Function PenStyle:integer;

- возвращает текущий стиль пера.

Действия с кистью.

Procedure SetBrushColor(color:integer);

- устанавливает цвет кисти.

Procedure BrushColor:integer;

- возвращает цвет кисти.

Procedure SetBrushPicture(fname:string);

- устанавливает в качестве образца для кисти, образец, хранящийся в файле fname.

Procedure ClearBrushPicture;

- очищает рисунок-образец, выбранный для кисти.

Procedure SetBrushStyle(bs:integer);

- устанавливает стиль кисти, заданный параметром bs.

Function BrushStyle:integer;

- возвращает текущий стиль кисти.

Действия со шрифтом

Procedure SetFontColor(color:integer);

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

Function FontColor:integer;

- возвращает цвет шрифта

Procedure SetFontSize(sz:integer);

- устанавливает размер шрифта

Function FontSize:integer;

- возвращает размер шрифта

Procedure SetFontName(name:string);

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

Function FontName:string;

- возвращает название шрифта

Procedure SetFontStyle(fs:integer);

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

Function FontStyle:integer;

- возвращает стиль шрифта

Function TextWidth(s:string):integer;

- возвращает ширину строки s в пикселях

Function TextHeight(s:string):integer;

- возвращает высоту строки s в пикселях.

Действия с рисунками.

Работа с рисунками производится либо с помощью описателей(целое число), либо с помощью объектов класса Picture. Описатель возвращается функцией загрузки рисунка, а также функцией создания рисунка.

Function LoadPicture(fname:string): integer;

- загружает рисунок из файла, возвращает описатель.

Procedure SavePicture(n:integer;fname:string);

- сохраняет рисунок.

Procedure DrawPicture(n,x,y:integer);

- выводит рисунок в позицию x,y окна.

Procedure DrawPicture(n,x,y,w,h:integer);

- выводит рисунок в позицию x,y графического окна, масштабируя его размеры к ширине w и высоте h.

Procedure DrawPicture(n:integer;x,y:integer;r:Rect);

- выводит часть рисунка в позицию x,y, заключенную в прямоугольнике r.

Procedure DrawPicture(n:integer;x,y,w,h:integer;r:Rect);

- выводит часть рисунка в позициию x,y в прямоугольнике r, масштабируя его размеры по высоте и ширине.

Procedure CupyRect(n:integer;dest:Rect;n1:integer;src:Rect);

- копирует часть рисунка, заключенную в прямоугольнике src в прямоугольник dest рисунка n.

Procedure DestroyPicture(n:integer);

- удаляет рисунок из памяти, освобождая описатель.

Procedure SetPictureSize(n,w,h:integer);

- устанавливает размер рисунка в пикселях.

Function PictureWidth(n:integer):integer;

- возвращает ширину рисунка.

Function PictureHeight(n:integer):integer;

- высота рисунка.

Function PictureTransparent(n:integer):Boolean;

- возвращает режим прозрачности.

Function CreatePicture(w,h:integer):integer;

- создает рисунок высоты h и ширины w и возвращает описатель на него.

Function CreatePictureFromRect(r:Rect):integer;

- создает рисунок из прямоугольника r и возвращает описатель на него.

Function CreatePictureFromScreenBufferRect(r:rect):integer;

- создает рисунок из прямоугольника r вне экранного буфера графического окна и возвращает указатель на него.

Procedure SetPictureTransparent(n:integer;b:boolean);

- устанавливает или отключает режим прозрачности.

Function ImageIntersect(n1,n2:integer):Boolean;

- определяет, пересекаются ли изображения на рисунках с описателями n1 и n2, рисунки должны иметь одинаковый размер, белый цвет на рисунке считается прозрачным. Рисунки считатся пересекающимися, если хотя бы один непрозрачный пиксель присутствует с одним и тем же цветом на обоих рисунках.

Function StandardImageFolder:string;

- возвращает стандартный каталог для рисунков.

Procedure FlipPictureHorizontal(n);

- заркально отображает картинку по горизонтали.

Procedure FlipPictureVertical(n);

- зеркально отображает картинку по вертикали.