Perl/Tk Pocket Reference

4. The Canvas Widget 15

$canvas->createPolygon(x1, y1, ... xN, yN ?, -option =>

value ... ?);

-splinesteps => number

Degree of smoothness desired for curved perimeter.

$canvas->createRectangle(x1, y1, x2, y2 ?, -option => value

... ?);

$canvas->createText(x, y ?,-option => value ... ?);

-justify => left| right| center

How to justify text within its bounding region.

-width => lineLength

Maximum line length for the text. If zero, break only on

\n.

$canvas->createWindow(x, y ?,-option => value ... ?);

-height => height Height in screen units to assign

item’s window.

-width => width Width in screen units to assign

item’s window.

-window => widgetRef Widget to associate with item.

Canvas PostScript Options

$canvas->postscript(?-option => value ... ?);

-fill => color

-stipple => bitmap

-outline => color

-tags => tagList

-smooth => boolean

-width => outlineWidth

-fill => color

-tags => tagList

-outline => color

-width => outlineWidth

-stipple => bitmap

-anchor => anchorPos

-stipple => bitmap

-fill => color

-tags => taglist

-font => font

-text => string

-anchor => anchorPos

-tags => tagList

16 Perl/Tk Pocket Reference

-colormap => varRef

Specifies a color mapping to use where varRef is an array

variable whose elements specify PostScript code to set a

particular color value.

-colormode => color| grey| mono

Specifies how to output color ...