fixed Delphi XE7 specific issue our read/only TDataSet