summaryrefslogtreecommitdiff
path: root/examples/apps
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-07-02 14:27:42 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-07-02 14:27:42 +0000
commitd2dee87211aa3dfc0b56ce5766a2eaa09570d0a5 (patch)
tree162b3a6e18d950c9a55eefd7c7d592f3231fad63 /examples/apps
parentfc7c9bce2641815fcd8dcc6858b88d304a85616e (diff)
downloadfpGUI-d2dee87211aa3dfc0b56ce5766a2eaa09570d0a5.tar.xz
* Applied Button patch from Michael van Canneyt. Adding ImageLayout property to Buttons.
Diffstat (limited to 'examples/apps')
-rw-r--r--examples/apps/uidesigner/vfdwidgets.pas5
1 files changed, 3 insertions, 2 deletions
diff --git a/examples/apps/uidesigner/vfdwidgets.pas b/examples/apps/uidesigner/vfdwidgets.pas
index 43004722..d47f0d88 100644
--- a/examples/apps/uidesigner/vfdwidgets.pas
+++ b/examples/apps/uidesigner/vfdwidgets.pas
@@ -261,9 +261,10 @@ begin
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, '');
+ wc.AddProperty('ImageLayout', TPropertyEnum, 'Which side of the button contains the image');
+ wc.AddProperty('ImageMargin', TPropertyInteger, 'Space between image and border, -1 centers image/text');
wc.AddProperty('ImageName', TPropertyString, '');
- wc.AddProperty('ImageSpacing', TPropertyInteger, '');
+ wc.AddProperty('ImageSpacing', TPropertyInteger, 'Space between image and text, -1 centers text');
wc.AddProperty('ModalResult', TPropertyInteger, '');
wc.AddProperty('ShowImage', TPropertyBoolean, 'Boolean value');
wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');