Draws an outline or filled rectangle at position start-x, start-y to end-x, end-y.
Restriction: This routine is not currently supported on UNIX platforms.
Syntax:
call "PC_PRINTER_DRAW_RECTANGLE" using
printer-handle
by value draw-rectangle-options
by value box-style
by value start-x
by value start-y
by value end-x
by value end-y
end-call
Parameters:
| |
Using call prototype (see
Key)
|
Picture
|
| printer-handle
|
cblt-x4-comp5
|
pic x(4) comp-5
|
|
draw-rectangle-options
|
cblt-x4-comp5
|
pic x(4) comp-5
|
| box-style
|
cblt-x4-comp5
|
pic x(4) comp-5
|
|
start-x,
start-y
|
cblt-x4-comp5
|
pic x(4) comp-5
|
|
end-x,
end-y
|
cblt-x4-comp5
|
pic x(4) comp-5
|
On Entry:
- printer-handle
- The printer handle returned when the printer was opened; see
PC_PRINTER_OPEN.
- draw-rectangle-options
- The options to apply to the rectangle. The valid options are:
| Value
|
Meaning
|
| 0
|
Use logical units of measurement
|
- box-style
- The style of rectangle to be drawn.
Note: For these settings to take effect, you must use PC_PRINTER_SET_PEN beforehand to set the colors for the fill.
| Value
|
Meaning
|
| 0
|
outline
|
| 1
|
filled
|
- start-x, start-y
- The starting point of the rectangle along the x-axis and y-axis.
- end-x, end-y
- The ending point of the rectangle along the x-axis and y-axis.
Comments:
Drawing the resulting rectangle does not change the logical position on the page used by other printer routines.