diff options
| author | Graeme Geldenhuys <graemeg@users.sourceforge.net> | 2006-12-06 23:16:34 +0000 |
|---|---|---|
| committer | Graeme Geldenhuys <graemeg@users.sourceforge.net> | 2006-12-06 23:16:34 +0000 |
| commit | c91eebac7b6d141d2da3114537942850accccab8 (patch) | |
| tree | 74b6f30b9ec5ae7d428d142206d3663008673ab1 /gui/form.inc | |
| parent | 1ef11a6d9353b976aa51856b1909f28f8750670b (diff) | |
| download | fpGUI-c91eebac7b6d141d2da3114537942850accccab8.tar.xz | |
* Added CreateBitmapCanvas and CreateMonoBitmapCanvas to TFCustomScreen class.
This is required for Styles to work. It could maybe be moved to another class
if needed.
* Create the missing instances for ImageCanvas, MaskCanvas and Palette in TDefaultStyle.
* Removed the ADisplay parameter from the TStyle constructor.
* Adapted the UTF Demo to work with the fpGUI changes. Tested under Linux only.
Diffstat (limited to 'gui/form.inc')
| -rw-r--r-- | gui/form.inc | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gui/form.inc b/gui/form.inc index 2cfb343d..f87b4f99 100644 --- a/gui/form.inc +++ b/gui/form.inc @@ -56,7 +56,9 @@ procedure WndShow(Sender: TObject); protected FBorderWidth: Integer; - FIsActive, FResizedByUser, FPositionSpecified: Boolean; + FIsActive: Boolean; + FResizedByUser: Boolean; + FPositionSpecified: Boolean; procedure Loaded; override; procedure Paint(Canvas: TFCanvas); override; procedure Resized; override; |