From 38f29ba1b9ae072e2f098ed52d553af1e5fb82b2 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 15 Jan 2016 11:58:38 +0000
Subject: [PATCH] TRxDateEdit - publish property Spacing (from lazarus rev.
 51277)

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4423 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/rxlookup.pas | 3 +++
 components/rx/trunk/tooledit.pas | 2 ++
 2 files changed, 5 insertions(+)

diff --git a/components/rx/trunk/rxlookup.pas b/components/rx/trunk/rxlookup.pas
index 81751355f..3132d794a 100644
--- a/components/rx/trunk/rxlookup.pas
+++ b/components/rx/trunk/rxlookup.pas
@@ -131,6 +131,8 @@ type
   public
     constructor Create(AOwner: TComponent); override;
     destructor Destroy; override;
+  published
+    property Spacing default 0;
   end;
 
   TRxLookupEdit = class(TRxCustomDBLookupEdit)
@@ -614,6 +616,7 @@ var
   P:TBitmap;
 begin
   inherited Create(AOwner);
+  Spacing:=0;
   FLocateObject:=CreateLocate(nil);
 
   //Lookup
diff --git a/components/rx/trunk/tooledit.pas b/components/rx/trunk/tooledit.pas
index 52f3b6618..e56b34f35 100644
--- a/components/rx/trunk/tooledit.pas
+++ b/components/rx/trunk/tooledit.pas
@@ -198,6 +198,7 @@ type
     property WeekendColor;
     property Weekends;
     property YearDigits;
+    property Spacing default 0;
 
     property OnAcceptDate;
     property OnChange;
@@ -376,6 +377,7 @@ end;
 constructor TRxDateEdit.Create(AOwner: TComponent);
 begin
   inherited Create(AOwner);
+  Spacing:=0;
   UpdateMask;
 end;