Important: The information in this document is obsolete and should not be used for new development.
PenSize
To set the dimensions of the graphics pen in the current graphics port, use thePenSizeprocedure.
PROCEDURE PenSize (width,height: Integer);
width- The pen width, as an integer from 0 to 32,767. If you set the value to 0, the pen does not draw. Values less than 0 are undefined.
height- The pen height, as an integer from 0 to 32,767. If you set the value to 0, the pen does not draw. Values less than 0 are undefined.
DESCRIPTION
ThePenSizeprocedure sets the width that you specify in thewidthparameter and the height that you specify in theheightparameter for the graphics pen in the current graphics port. All subsequent calls to theLineandLineToprocedures and to the procedures that draw framed shapes in the current graphics port use the new pen dimensions.You can get the current pen dimensions from the
pnSizefield of the current graphics port, where the width and height are stored as aPointrecord.SEE ALSO
Listing 3-2 on page 3-17 illustrates how to use this procedure.