Call Create to create a TPen object for assigning the pen property of a canvas. The pen for the canvas is created automatically in the constructor for the TCanvas object.
Create allocates memory for the TPen object and initializes the Mode property to pmCopy.