diff --git a/FIBDataSet.pas b/FIBDataSet.pas
index 7575690..640456b 100644
--- a/FIBDataSet.pas
+++ b/FIBDataSet.pas
@@ -1246,7 +1246,7 @@   TFIBCustomDataSet = class({$IFDEF TWideDataSet}TWideDataset{$ELSE}TDataset{$EN
     function Translate(Src, Dest: PAnsiChar; ToOem: Boolean): Integer; override;
     function UpdateStatus: TUpdateStatus; override;
     function IsSequenced: Boolean; override;        // Scroll bar
-    property qDefaultFields:boolean read GetDefaultFields ;
+    property {$IF CompilerVersion >= 27}qDefaultFields{$ELSE}DefaultFields{$IFEND}:boolean read GetDefaultFields ; //deprecated since Delphi XE6+
   public
 {$IFDEF CSMonitor}
     procedure SetCSMonitorSupportToQ;