diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-04-15 19:01:11 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2010-04-15 19:01:11 +0200 |
commit | 4919001acc932b90cf716d682351571dfe8d1d55 (patch) | |
tree | 5ec46c061e60a0ced780f5bcee834a4d744301f7 /uidesigner | |
parent | 377561431c9805cdbf75a864c8305c044410726b (diff) | |
download | fpGUI-4919001acc932b90cf716d682351571dfe8d1d55.tar.xz |
UI Designer: exposed the ExtraHint property of TfpgEdit and TfpgFilenameEdit
Diffstat (limited to 'uidesigner')
-rw-r--r-- | uidesigner/vfdwidgets.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas index 7a564327..be82bf25 100644 --- a/uidesigner/vfdwidgets.pas +++ b/uidesigner/vfdwidgets.pas @@ -330,6 +330,7 @@ begin wc.AddProperty('AutoSelect', TPropertyBoolean, 'On receiving focus, auto select text'); wc.AddProperty('AutoSize', TPropertyBoolean, 'Change Height based on FontDesc being set'); wc.AddProperty('BorderStyle', TPropertyEnum, ''); + wc.AddProperty('ExtraHint', TPropertyString, ''); wc.AddProperty('Hint', TPropertyString, 'Tooltip hint'); wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order'); wc.AddProperty('Text', TPropertyString, 'Initial text'); @@ -723,6 +724,7 @@ begin // Filename Edit wc := TVFDWidgetClass.Create(TfpgFileNameEdit); wc.NameBase := 'FilenameEdit'; + wc.AddProperty('ExtraHint', TPropertyString, ''); wc.AddProperty('FileName', TPropertyString, 'Initial starting directory of the dialog'); wc.AddProperty('InitialDir', TPropertyString, 'Initial starting directory of the dialog'); wc.AddProperty('Filter', TPropertyString, 'Filename filters used in the dialog'); |