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

@@ -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;