🚀 go-pugleaf

  I am currently trying to run a query against 3 joined dbase 5.0 tables
with approximatly 30,000 records.  Unfortunatly the nature of the queries
usualy cause them to return about 90% of the records, and this usually takes
a few minutes.  which is too long.  is there a way i can retrieve the result
set 50 records or so at a time instead of all at once,  in other words fetch
the first 50, then the next 50 at the press of a button and so on and so
forth.  if not is there any way i can speed the query  up.  this is my code,
if it helps:

  sSQL := 'SELECT BID, SKEY1, UKEY1, CLOSE_DT, ' +
         'FUND_DT, Q_STATUS, DOC_DESC, DEF_DESC, RESP_AREA, ' +
         'STAT_CODE, DOC_CODE, DEF_CODE, CORP_DEF ' +
         'FROM DEFICIEN, DEFIC_Q, FOLDERS ' +
    'WHERE ' +
      '(DEFICIEN.BID = DEFIC_Q.BID) AND ' +
      '(DEFICIEN.SKEY1 = DEFIC_Q.SKEY1) AND ' +
      '(DEFICIEN.BID = FOLDERS.BID) AND ' +
      '(DEFICIEN.SKEY1 = FOLDERS.SKEY1) AND ' +
      '(DEFIC_Q.Q_STATUS <> "T") AND ' +
      '(DEFIC_Q.Q_STATUS <> "P") ' + sFilterStr +
    'ORDER BY ' + sSortFields;

  tblDQueue.SQL.Clear;
  tblDQueue.SQL.Add(sSQL);

  try
    tblDQueue.Active := True;
  except on EDatabaseError do
    begin
      MessageDlg('Unable to open table "' + tblDQueue.Name +
'".',mtError,[mbOK],0);
      Exit;
    end;
  end;