Draw the specified Border structure into a RastPort.
Source position: intuition.pas line 3819
procedure DrawBorder( |
Rp: PRastPort; |
const Border: PBorder; |
LeftOffset: LongInt; |
TopOffset: LongInt |
); |
Rp |
|
A pointer to the RastPort to receive the border rendering |
Border |
|
A pointer to a Border structure |
LeftOffset |
|
The offset to be added to each vector's x coordinate |
TopOffset |
|
The offset to be added to each vector's y coordinate |
First, sets up the draw mode and pens in the RastPort according to the arguments of the Border structure. Then, draws the vectors of the border argument into the RastPort, offset by the left and top offsets.
As with all graphics rendering routines, the border will be clipped to to the boundaries of the RastPort's layer, if it exists. This is the case with window RastPorts.
This routine will draw all borders in the null-terminated list linked by the NextBorder field of the border argument.