From 7196a34234d597cc5c86711d0c5f71d9d9afea97 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 8 Jan 2011 12:26:10 +0000
Subject: [PATCH] fix compilation for zeos sort engine for rxdbgrid

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

diff --git a/components/rx/exsortzeos.pas b/components/rx/exsortzeos.pas
index cd2f4fc66..c9475ce40 100644
--- a/components/rx/exsortzeos.pas
+++ b/components/rx/exsortzeos.pas
@@ -8,15 +8,18 @@ uses
   Classes, SysUtils, DB, RxDBGrid, ZConnection, ZDataset, ZAbstractRODataset;
 
 type
-  TFBDataSetSortEngine = class(TExDBGridSortEngine)
+
+  { TZeosDataSetSortEngine }
+
+  TZeosDataSetSortEngine = class(TRxDBGridSortEngine)
   public
-    procedure Sort(Field:TField; ADataSet:TDataSet; Asc:boolean);override;
+    procedure Sort(Field:TField; ADataSet:TDataSet; Asc:boolean; SortOptions:TRxSortEngineOptions);override;
     procedure SortList(ListField:string; ADataSet:TDataSet; Asc:boolean);override;
   end;
 
 implementation
 
-procedure TFBDataSetSortEngine.Sort(Field:TField; ADataSet:TDataSet; Asc:boolean);
+procedure TZeosDataSetSortEngine.Sort(Field:TField; ADataSet:TDataSet; Asc:boolean; SortOptions:TRxSortEngineOptions);
 begin
   if Assigned(ADataSet) then
     if ADataSet.ClassName='TZReadOnlyQuery' then
@@ -47,7 +50,7 @@ begin
           end;
 end;
 
-procedure TFBDataSetSortEngine.SortList(ListField:string; ADataSet:TDataSet; Asc:boolean);
+procedure TZeosDataSetSortEngine.SortList(ListField:string; ADataSet:TDataSet; Asc:boolean);
 begin
   if Assigned(ADataSet) then
     if ADataSet.ClassName='TZReadOnlyQuery' then
@@ -80,8 +83,8 @@ end;
 
 
 initialization
-  RegisterExDBGridSortEngine(TFBDataSetSortEngine, TZReadOnlyQuery);
-  RegisterExDBGridSortEngine(TFBDataSetSortEngine, TZQuery);
-  RegisterExDBGridSortEngine(TFBDataSetSortEngine, TZTable);
+  RegisterRxDBGridSortEngine(TZeosDataSetSortEngine, TZReadOnlyQuery);
+  RegisterRxDBGridSortEngine(TZeosDataSetSortEngine, TZQuery);
+  RegisterRxDBGridSortEngine(TZeosDataSetSortEngine, TZTable);
 end.