From 243fa395dd62416e2265cfc37522f667f94cec81 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 25 Mar 2016 08:15:12 +0000
Subject: [PATCH] RxFPC:TZeosDataSetSortEngine fix sorting on collimns with
 space in field name

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

diff --git a/components/rx/trunk/exsortzeos.pas b/components/rx/trunk/exsortzeos.pas
index f68a7e6fd..1d29dad8f 100644
--- a/components/rx/trunk/exsortzeos.pas
+++ b/components/rx/trunk/exsortzeos.pas
@@ -56,6 +56,10 @@ procedure TZeosDataSetSortEngine.Sort(FieldName: string; ADataSet: TDataSet;
   Asc: boolean; SortOptions: TRxSortEngineOptions);
 begin
   if not Assigned(ADataSet) then exit;
+
+  if Pos(' ', FieldName)>0 then
+    FieldName:='"'+FieldName+'"';
+
   if ADataSet is TZAbstractRODataset then
   begin
     TZAbstractRODataset(ADataSet).SortedFields:=FieldName;