diff options
Diffstat (limited to 'uidesigner/vfdwidgets.pas')
-rw-r--r-- | uidesigner/vfdwidgets.pas | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas index 7188aabb..f2c9cd57 100644 --- a/uidesigner/vfdwidgets.pas +++ b/uidesigner/vfdwidgets.pas @@ -289,6 +289,11 @@ begin 'vfd.editdirectory', @stdimg_vfd_editdirectory, sizeof(stdimg_vfd_editdirectory), 0, 0); + + fpgImages.AddMaskedBMP( + 'vfd.editfont', @stdimg_vfd_editfont, + sizeof(stdimg_vfd_editfont), + 0, 0); end; procedure AddWidgetPosProps(wgc: TVFDWidgetClass); @@ -746,6 +751,14 @@ begin wc.WidgetIconName := 'vfd.editdirectory'; RegisterVFDWidget(wc); + // Font Edit + wc := TVFDWidgetClass.Create(TfpgFontEdit); + wc.NameBase := 'DirectoryEdit'; + wc.AddProperty('FontDesc', TPropertyString, 'Specify a preset font description'); + wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order'); + wc.WidgetIconName := 'vfd.editfont'; + RegisterVFDWidget(wc); + // Other - do not delete!!! this should be the last... wc := TVFDWidgetClass.Create(TOtherWidget); wc.NameBase := 'Custom'; |