Sign in Join
FPDoc Onlineexperiment

TCustomLabel.Paint procedure

Member of TCustomLabelpublicIn unit StdCtrls

Performs actions needed to draw the control on its Canvas.

Declaration

pascal
procedure Paint; override

Description

Paint is an overridden method in TCustomLabel used to draw the control on its Canvas. Paint ensures that property values in the control are applied to the Canvas before measuring and drawing its Text, including:

  • AutoSize
  • Alignment
  • Layout
  • WordWrap, based on Align, Constraints, anchoring and/or WordWrapLength
  • Transparent
  • Color
  • Font
  • ShowAccel
  • Enabled
  • UseRightToLeftAlignment, UseRightToLeftReading

DoDrawText is called to render the label text using the DrawText flags needed for the property values.

Paint does not call the inherited method in TGraphicControl. As a result, it does not signal the OnPaint event handler in the ancestor class.

See also

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.