datamodule2.ClientDataSet5.close; DataModule2.ClientDataSet5.CommandText:='select name,partname,tel '+ 'from (select row_number() over(order by id) as rownumber,* from view_fundation) as t '+ ' where rownumber between 10*(1-1) + 1 and 10*1'; datamodule2.ClientDataSet5.open;