TPostScriptPrinterCanvas.CreatePen procedure

Declaration

procedure CreatePen; override

Description

Not described here; this is what TCanvas.CreatePen says of it:

Ensures that the Pen for the canvas is valid, configured, and positioned.

CreatePen is a procedure used to create, configure and position the pen for the canvas.

CreatePen calls SelectObject to get the Handle for the Pen, and saves a copy for local access in the class instance. The MoveTo method is called to position the Pen to the coordinates in the PenPos property. Canvas state flags are updated to indicate that the handle for the Pen is valid.

CreatePen is called when RequiredState is used to check for a valid pen handle.