diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-04 13:21:40 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-04 13:21:40 +0200 |
| commit | 1848688549c006dc5e1aaa71b6b8eae60c53b58f (patch) | |
| tree | 8ffe44468b899200a757dcb851cf94ba74c23d9d /uidesigner | |
| parent | 41b8a4ebf5154ff6e93208f6ce98e728000566f4 (diff) | |
| download | fpGUI-1848688549c006dc5e1aaa71b6b8eae60c53b58f.tar.xz | |
UI Designer: Add Color Listbox widget to component palette.
Diffstat (limited to 'uidesigner')
| -rw-r--r-- | uidesigner/vfdwidgets.pas | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas index ba035a81..1cac5750 100644 --- a/uidesigner/vfdwidgets.pas +++ b/uidesigner/vfdwidgets.pas @@ -444,6 +444,23 @@ begin wc.WidgetIconName := 'vfd.listbox'; RegisterVFDWidget(wc); + // Color ListBox + wc := TVFDWidgetClass.Create(TfpgColorListBox); + wc.NameBase := 'ColorListBox'; + wc.AddProperty('AutoHeight', TPropertyBoolean, ''); + wc.AddProperty('ColorPalette', TPropertyEnum, ''); + wc.Addproperty('DragToReorder', TPropertyBoolean, ''); + wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text'); + wc.AddProperty('Hint', TPropertyString, 'Tooltip hint'); + wc.AddProperty('HotTrack', TPropertyBoolean, ''); + wc.AddProperty('ParentShowHint', TPropertyBoolean, ''); + wc.AddProperty('PopupFrame', TPropertyBoolean, ''); + wc.AddProperty('ShowColorNames', TPropertyBoolean, ''); + wc.AddProperty('ShowHint', TPropertyBoolean, ''); + wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order'); + wc.WidgetIconName := 'vfd.colorlistbox'; + RegisterVFDWidget(wc); + // StringGrid wc := TVFDWidgetClass.Create(TfpgStringGrid); wc.NameBase := 'Grid'; |