summaryrefslogtreecommitdiff
path: root/uidesigner/vfdwidgets.pas
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-09-21 11:07:37 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-09-21 11:07:37 +0200
commitb6b144fc77ec90ff4503a616c6d12263d0405fda (patch)
tree63d19f1293858cec902e92f9ec42807354e05796 /uidesigner/vfdwidgets.pas
parent473049a821cea6ebfb9a8d11fb8d6b8662afba06 (diff)
downloadfpGUI-b6b144fc77ec90ff4503a616c6d12263d0405fda.tar.xz
uidesigner: new published property (Down) for TpgButton.
Diffstat (limited to 'uidesigner/vfdwidgets.pas')
-rw-r--r--uidesigner/vfdwidgets.pas1
1 files changed, 1 insertions, 0 deletions
diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas
index ae07c08f..1713336a 100644
--- a/uidesigner/vfdwidgets.pas
+++ b/uidesigner/vfdwidgets.pas
@@ -367,6 +367,7 @@ begin
wc.NameBase := 'Button';
wc.AddProperty('Text', TPropertyString, 'Initial text');
wc.AddProperty('AllowAllUp', TPropertyBoolean, '');
+ wc.AddProperty('Down', TPropertyBoolean, 'Only valid when in group mode');
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');