From d6650be349f81728fde94ad2e7ee9912f3115145 Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graeme@mastermaths.co.za>
Date: Mon, 4 Oct 2010 17:02:15 +0200
Subject: uidesigner: Registered Splitter in component palette.

---
 uidesigner/vfdwidgets.pas | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'uidesigner/vfdwidgets.pas')

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';
-- 
cgit v1.2.3-70-g09d2