TBrush.SetColor procedure
Sets the value for the Color property.
Declaration
procedure SetColor(const NewColor: TColor; const NewFPColor: TFPColor)
; virtual
procedure SetColor(Value: TColor)Arguments
NewColor | TColor value applied to the brush Color. |
NewFPColor | TFPColor value applied to the brush Color. |
Value | New value for the property. |
Description
An overloaded variant provides both TColor and TFPColor
values. It is used to set the color by calling the SetFPColor
method in the ancestor class. No actions are performed in the method when the
values in Color and FPColor have not been changed and
the brush Style contains bsClear.
Frees the brush handle in the References property, and sets the
value in Bitmap to Nil. Calls the inherited
SetStyle method when Style is bsClear. Calls Changed to
signal the OnChange event handler (when assigned).
See also
An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.