// тест скорости

var table :ttable;
begin

  table := ttable.create(nil);
  try
    table.databasename := 'dbkassa';
    table.tablename := 'rs_tovar';

    table.open;
    table.first;
    while not table.eof do begin
      table.next;
    end;
  finally
    table.free;
  end;



end.