uidesigner: Registered Splitter in component palette.

1 files changed, 15 insertions, 0 deletions

diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas
index ad45c113..08031eb6 100644
--- a/uidesigner/vfdwidgets.pas
+++ b/uidesigner/vfdwidgets.pas
@@ -65,6 +65,7 @@ uses
   fpg_gauge,
   fpg_editbtn,
   fpg_ColorWheel,
+  fpg_splitter,
   vfdpropeditgrid,
   vfdmain;
 
@@ -305,6 +306,11 @@ begin
     'vfd.valuebar', @stdimg_vfd_valuebar,
     sizeof(stdimg_vfd_valuebar),
     0, 0);
+
+  fpgImages.AddMaskedBMP(
+    'vfd.splitter', @stdimg_vfd_splitter,
+    sizeof(stdimg_vfd_splitter),
+    0, 0);
 end;
 
 procedure AddWidgetPosProps(wgc: TVFDWidgetClass);
@@ -881,6 +887,15 @@ begin
   wc.WidgetIconName := 'vfd.valuebar';
   RegisterVFDWidget(wc);
 
+  // Splitter - works in accordance with color wheel
+  wc          := TVFDWidgetClass.Create(TfpgSplitter);
+  wc.NameBase := 'Splitter';
+  wc.AddProperty('Align', TPropertyEnum, '');
+  wc.AddProperty('ColorGrabBar', TPropertyColor, '');
+  wc.AddProperty('AutoSnap', TPropertyBoolean, '');
+  wc.WidgetIconName := 'vfd.splitter';
+  RegisterVFDWidget(wc);
+
   // Other - do not delete!!! this should be the last...
   wc          := TVFDWidgetClass.Create(TOtherWidget);
   wc.NameBase := 'Custom';