summaryrefslogtreecommitdiff
path: root/src/gui/fpg_panel.pas
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2011-01-12 16:54:02 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2011-01-12 16:54:02 +0200
commit5b8a346ae44720db994294309d549b4bf421094d (patch)
treee2aa0cd44517255a4d89f7a38d9de5d9813cef67 /src/gui/fpg_panel.pas
parent7144d85a3b19581a4ddf875e9f87475707220b78 (diff)
downloadfpGUI-5b8a346ae44720db994294309d549b4bf421094d.tar.xz
Use Width and Height properties instead of internal fields in constructor
This is sow that the internal FPrevXXX and other state information is setup correctly. The Edit Button controls also needed some extra code to work correctly in the UI Designer.
Diffstat (limited to 'src/gui/fpg_panel.pas')
-rw-r--r--src/gui/fpg_panel.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_panel.pas b/src/gui/fpg_panel.pas
index 66ed5778..112ca0ea 100644
--- a/src/gui/fpg_panel.pas
+++ b/src/gui/fpg_panel.pas
@@ -331,8 +331,8 @@ begin
inherited Create(AOwner);
FPanelStyle := bsRaised;
FPanelBorder := bsSingle;
- FWidth := 80;
- FHeight := 80;
+ Width := 80;
+ Height := 80;
FFocusable := True; // otherwise children can't get focus
FParentBackgroundColor := False;
FIsContainer := True;