From a99e83b444e8770cb5f71831fba7144a5a27c691 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 13 Nov 2017 11:19:12 +0000
Subject: [PATCH] RxFPC:fix compile rxdbverticalgrid on lazarus < 1.9 -
 id0032500

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6067 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/rxdb/rxdbverticalgrid.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/rx/trunk/rxdb/rxdbverticalgrid.pas b/components/rx/trunk/rxdb/rxdbverticalgrid.pas
index ed028940a..4c6bf8174 100644
--- a/components/rx/trunk/rxdb/rxdbverticalgrid.pas
+++ b/components/rx/trunk/rxdb/rxdbverticalgrid.pas
@@ -351,8 +351,11 @@ type
   end;
 
 implementation
-uses LCLType, Math, Forms, rxdconst, rxlclutils, StdCtrls, Themes, LazUTF8;
+uses LCLType, Math, Forms, rxdconst, rxlclutils, StdCtrls, Themes, LazUTF8, LCLVersion;
 
+{$IFDEF lcl_version<'1.9.0.0'}
+  varCellPadding = 2;
+{$ENDIF}
 { TRxDBVerticalGridDefValues }
 
 procedure TRxDBVerticalGridDefValues.AssignTo(Dest: TPersistent);