diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-05-10 12:09:51 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-05-10 12:09:51 +0200 |
| commit | 35f8bc2b5ac57705dcd9e269c436a2bc979c6a2a (patch) | |
| tree | a64093b3387d33f8476daea18497b07969c63871 /src/gui | |
| parent | 777112ee159cafc21c925653867e79de117691d6 (diff) | |
| download | fpGUI-35f8bc2b5ac57705dcd9e269c436a2bc979c6a2a.tar.xz | |
In the constructor, use the property instead of the field variables.
This applies to Top, Left, Width and Height properties. This will then
correctly setup the internal component state for resizing.
Diffstat (limited to 'src/gui')
| -rw-r--r-- | src/gui/fpg_label.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_label.pas b/src/gui/fpg_label.pas index 5bae18ad..a600908f 100644 --- a/src/gui/fpg_label.pas +++ b/src/gui/fpg_label.pas @@ -212,8 +212,8 @@ begin inherited Create(AOwner); FText := 'Label'; FFont := fpgGetFont('#Label1'); - FHeight := FFont.Height; - FWidth := 80; + Height := FFont.Height; + Width := 80; FTextColor := Parent.TextColor; FBackgroundColor := Parent.BackgroundColor; FAutoSize := False; |