danieleteti/delphimvcframework

MaxRecordCount don't wok

arkadiusz-wolanski opened this issue · 0 comments

Hi,

the parameter MaxRecordCount for the Method SelectRQL doesn't work, it is ignored by the Method InternalSelectRQL:

function TMVCActiveRecord.InternalSelectRQL(const RQL: string; const MaxRecordCount: Integer): TMVCActiveRecordList;
var
  lSQL: string;
begin
  lSQL := SQLGenerator.CreateSQLWhereByRQL(RQL, GetMapping);
  LogD(Format('RQL [%s] => SQL [%s]', [RQL, lSQL]));
  Result := Where(TMVCActiveRecordClass(Self.ClassType), lSQL, []);
end;

If you use this Method for a huge Table, it delivers all records.