diff options
| -rw-r--r-- | src/gui/fpg_panel.pas | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/gui/fpg_panel.pas b/src/gui/fpg_panel.pas index 2d97ed71..bd6333ce 100644 --- a/src/gui/fpg_panel.pas +++ b/src/gui/fpg_panel.pas @@ -72,6 +72,8 @@ type procedure DrawVerDivider; // bsVerDivider protected procedure HandlePaint; override; + public + constructor Create(AOwner: TComponent); override; published property AcceptDrops; property Align; @@ -606,6 +608,12 @@ begin end; end; +constructor TfpgBevel.Create(AOwner: TComponent); +begin + inherited Create(AOwner); + FPanelShape := bsBox; +end; + {TfpgPanel} function TfpgPanel.GetAlignment: TAlignment; |