From 7c25da7b8a9f7f16caeccb23215a1e7cda3c52ab Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 25 Sep 2012 18:03:19 +0000
Subject: [PATCH] fix compile with FPC 2.6 - Lazarus 1.0

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2540 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/rx.inc       |  4 ++++
 components/rx/rxdbgrid.pas | 27 +++++++++++++++++++++++++++
 2 files changed, 31 insertions(+)

diff --git a/components/rx/rx.inc b/components/rx/rx.inc
index f632327ec..7962dba7d 100644
--- a/components/rx/rx.inc
+++ b/components/rx/rx.inc
@@ -54,3 +54,7 @@
   {$DEFINE NoAutomatedBookmark}
 {$endif}
 
+{$IFDEF NoAutomatedBookmark}
+{$ELSE}
+{$ENDIF}
+
diff --git a/components/rx/rxdbgrid.pas b/components/rx/rxdbgrid.pas
index 356d1cde0..3e496e6ad 100644
--- a/components/rx/rxdbgrid.pas
+++ b/components/rx/rxdbgrid.pas
@@ -3859,7 +3859,11 @@ begin
   if DatalinkActive then
   begin
     DataSource.DataSet.DisableControls;
+{$IFDEF NoAutomatedBookmark}
+    P:=DataSource.DataSet.GetBookmark;
+{$ELSE}
     P:=DataSource.DataSet.Bookmark;
+{$ENDIF}
     try
       DataSource.DataSet.First;
       while not DataSource.DataSet.EOF do
@@ -3868,7 +3872,12 @@ begin
         DataSource.DataSet.Next;
       end;
     finally
+{$IFDEF NoAutomatedBookmark}
+      DataSource.DataSet.GotoBookmark(P);
+      DataSource.DataSet.FreeBookmark(P);
+{$ELSE}
       DataSource.DataSet.Bookmark:=P;
+{$ENDIF}
       DataSource.DataSet.EnableControls;
     end;
     Invalidate;
@@ -3882,7 +3891,11 @@ begin
   if DatalinkActive then
   begin
     DataSource.DataSet.DisableControls;
+{$IFDEF NoAutomatedBookmark}
+    P:=DataSource.DataSet.GetBookmark;
+{$ELSE}
     P:=DataSource.DataSet.Bookmark;
+{$ENDIF}
     try
       DataSource.DataSet.First;
       while not DataSource.DataSet.EOF do
@@ -3891,7 +3904,12 @@ begin
         DataSource.DataSet.Next;
       end;
     finally
+{$IFDEF NoAutomatedBookmark}
+      DataSource.DataSet.GotoBookmark(P);
+      DataSource.DataSet.FreeBookmark(P);
+{$ELSE}
       DataSource.DataSet.Bookmark:=P;
+{$ENDIF}
       DataSource.DataSet.EnableControls;
     end;
     Invalidate;
@@ -3905,7 +3923,11 @@ begin
   if DatalinkActive then
   begin
     DataSource.DataSet.DisableControls;
+    {$IFDEF NoAutomatedBookmark}
+    P:=DataSource.DataSet.GetBookmark;
+    {$ELSE}
     P:=DataSource.DataSet.Bookmark;
+    {$ENDIF}
     try
       DataSource.DataSet.First;
       while not DataSource.DataSet.EOF do
@@ -3914,7 +3936,12 @@ begin
         DataSource.DataSet.Next;
       end;
     finally
+      {$IFDEF NoAutomatedBookmark}
+      DataSource.DataSet.GotoBookmark(P);
+      DataSource.DataSet.FreeBookmark(P);
+      {$ELSE}
       DataSource.DataSet.Bookmark:=P;
+      {$ENDIF}
       DataSource.DataSet.EnableControls;
     end;
     Invalidate;