TCustomShape.StyleChanged procedure
Implements an OnChange event handler signalled when the Brush or the Pen on the control has been changed.
Declaration
procedure StyleChanged(Sender: TObject)Arguments
Sender | Object for the event notification. |
Description
StyleChanged is a method used to perform actions needed when the
Brush or Pen for the shaped control has been changed. StyleChanged is assigned
to the OnChanged event handler (in both Brush and Pen) in the Create
constructor.
Sender contains the object instance for the event notification, but
it is not used in the implementation.
StyleChanged ensures that the control has an assigned Parent with a valid Handle before calling Invalidate to redraw the control. No actions are performed in the handler if Parent is Nil, when the control is not Visible, or at design-time.
See also
An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.