W Cat - Описание языка PascalABC.NET

propertyWidth: integer;

Ширина рисунка в пикселах

propertyHeight: integer;

Высота рисунка в пикселах

propertyTransparent: boolean;

Прозрачность рисунка; прозрачный цвет задается свойством TransparentColor

propertyTransparentColor: Color;

Прозрачный цвет рисунка. Должна быть установлена прозрачность Transparent = True

procedureLoad(fname: string);

Загружает рисунок из файла с именем fname

procedureSave(fname: string);

Сохраняет рисунок в файл с именем fname

procedureSetSize(w,h: integer);

Устанавливает размер рисунка w на h пикселей

functionIntersect(p: Picture): boolean;

Возвращает True, если изображение данного рисунка пересекается с изображением рисунка p, и False в противном случае. Для проверки пересечения оба объекта рисуются на белом фоне, и прямоугольник пересечения попиксельно проверяется на пересечение. К сожалению, при таком алгоритме любые белые пиксели считаются не принадлежащими объекту. Поэтому для корректной работы этого метода не следует использовать белый цвет для внутренности объекта.

procedureDraw(x,y: integer);

Выводит рисунок в позиции (x,y)

procedureDraw(x,y: integer; g: Graphics);

Выводит рисунок в позиции (x,y) на поверхность рисования g

procedureDraw(x,y,w,h: integer);

Выводит рисунок в позиции (x,y), масштабируя его к размеру (w,h)

procedureDraw(x,y,w,h: integer; g: Graphics);

Выводит рисунок в позиции (x,y), масштабируя его к размеру (w,h), на поверхность рисования g

procedureDraw(x,y: integer; r: System.Drawing.Rectangle); // r - part ofPicture

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

procedureDraw(x,y: integer; r: System.Drawing.Rectangle; g: Graphics);

Выводит часть рисунка, заключенную в прямоугольнике r, в позиции (x,y) на поверхность рисования g

procedureDraw(x,y,w,h: integer; r: System.Drawing.Rectangle); // r - part ofPicture

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

procedureDraw(x,y,w,h: integer; r: System.Drawing.Rectangle; g: Graphics);

Выводит часть рисунка, заключенную в прямоугольнике r, в позиции (x,y), масштабируя его к размеру (w,h), на поверхность рисования g

procedureCopyRect(dst: System.Drawing.Rectangle; p: Picture; src: System.Drawing.Rectangle);

Копирует прямоугольник src рисунка p в прямоугольник dst текущего рисунка

procedureCopyRect(dst: System.Drawing.Rectangle; bmp: Bitmap; src: System.Drawing.Rectangle);

Копирует прямоугольник src битового образа bmp в прямоугольник dst текущего рисунка

procedureFlipHorizontal;

Зеркально отображает рисунок относительно горизонтальной оси симметрии

procedureFlipVertical;

Зеркально отображает рисунок относительно вертикальной оси симметрии

procedureSetPixel(x,y: integer; c: Color);

Закрашивает пиксел (x,y) рисунка цветом c

procedurePutPixel(x,y: integer; c: Color);

Закрашивает пиксел (x,y) рисунка цветом c

functionGetPixel(x,y: integer): Color;

Возвращает цвет пиксела (x,y) рисунка

procedureLine(x1,y1,x2,y2: integer);

Выводит на рисунке отрезок от точки (x1,y1) до точки (x2,y2)

procedureLine(x1,y1,x2,y2: integer; c: Color);

Выводит на рисунке отрезок от точки (x1,y1) до точки (x2,y2) цветом c

procedureFillCircle(x,y,r: integer);

Заполняет на рисунке внутренность окружности с центром (x,y) и радиусом r

procedureDrawCircle(x,y,r: integer);

Выводит на рисунке окружность с центром (x,y) и радиусом r

procedureFillEllipse(x1,y1,x2,y2: integer);

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

procedureDrawEllipse(x1,y1,x2,y2: integer);

Выводит на рисунке границу эллипса, ограниченного прямоугольником, заданным координатами противоположных вершин (x1,y1) и (x2,y2)

procedureFillRectangle(x1,y1,x2,y2: integer);

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

procedureFillRect(x1,y1,x2,y2: integer);

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

procedureDrawRectangle(x1,y1,x2,y2: integer);

Выводит на рисунке границу ы прямоугольника, заданного координатами противоположных вершин (x1,y1) и (x2,y2)