diff options
Diffstat (limited to 'src/corelib')
-rw-r--r-- | src/corelib/fpg_main.pas | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/corelib/fpg_main.pas b/src/corelib/fpg_main.pas index a6f6b0cc..d3b7693d 100644 --- a/src/corelib/fpg_main.pas +++ b/src/corelib/fpg_main.pas @@ -217,6 +217,7 @@ type procedure DrawMenuItemSeparator(ACanvas: TfpgCanvas; r: TfpgRect); virtual; procedure DrawMenuItemImage(ACanvas: TfpgCanvas; x, y: TfpgCoord; r: TfpgRect; AFlags: TfpgMenuItemFlags); virtual; function GetButtonBorders: TRect; virtual; + function GetButtonShift: TPoint; virtual; function GetControlFrameBorders: TRect; virtual; function GetSeparatorSize: integer; virtual; end; @@ -2349,6 +2350,11 @@ begin Result := Rect(5, 5, 5, 5); end; +function TfpgStyle.GetButtonShift: TPoint; +begin + Result := Point(1, 1); +end; + function TfpgStyle.GetControlFrameBorders: TRect; begin Result := Rect(2, 2, 2, 2); |