diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-01 10:42:14 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-01 10:42:14 +0000 |
| commit | d77c30bf2891857f9336b46b95a8739801bcb0e3 (patch) | |
| tree | a27696d360cf02d695a74875fa7ccb23eed93fc4 /examples | |
| parent | ea4a9faddc8c3a5322d43d2484df9d6cc1a04041 (diff) | |
| download | fpGUI-d77c30bf2891857f9336b46b95a8739801bcb0e3.tar.xz | |
* TfpgButton now contains a new property called Flat which gives it a flat look. As the mouse hovers over the button, it gets the normal look. This property overrides the Default property look.
* UI Designer now has support for the Button.Flat property, but the flat behaviour has been disabled in the designer form to make buttons more visible compared to labels.
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/apps/uidesigner/vfdwidgets.pas | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/apps/uidesigner/vfdwidgets.pas b/examples/apps/uidesigner/vfdwidgets.pas index 730dbb89..43004722 100644 --- a/examples/apps/uidesigner/vfdwidgets.pas +++ b/examples/apps/uidesigner/vfdwidgets.pas @@ -258,6 +258,7 @@ begin wc.AddProperty('Text', TPropertyString, 'Initial text'); wc.AddProperty('AllowAllUp', TPropertyBoolean, ''); wc.AddProperty('Embedded', TPropertyBoolean, 'No focus rectangle will be drawn. eg: Toolbar buttons'); + wc.AddProperty('Flat', TPropertyBoolean, 'Only draw button borders when mouse hovers over button'); wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text'); wc.AddProperty('GroupIndex', TPropertyInteger, ''); wc.AddProperty('ImageMargin', TPropertyInteger, ''); |