Draws an outline or filled rectangle at position start-x,start-y to end-x,end-y
Note:
This routine is supported for native COBOL only.
Syntax:
call "PC_PRINTER_DRAW_RECTANGLE" using
by value 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 |
draw-rectangle-options
|
cblt-x4-comp5 |
pic x(4) comp-5. |
start-x
|
cblt-x4-comp5 |
pic x(4) comp-5. |
end-x
|
cblt-x4-comp5 |
pic x(4) comp-5. |
On Entry:
|
Value |
Meaning |
box-style
|
0 |
outline |
|
1 |
filled |
Comments:
Does not change the logicial position on the page.