TThemeServices.PaintBorder procedure

Member of TThemeServicespublicIn unit Themes

Default painting method for the borders for a control.

Declaration

pascal

procedure PaintBorder(Control: TObject; EraseLRCorner: Boolean)
 ; virtual

Description

PaintBorder has an empty implementation in TThemeServices. It must be overridden in a descendent class to use the native border drawing style for the widgetset.

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