To com uma duvida que to tentando resolver aqui mas nada.
Tenho o D7 e o SQL Server. Faço uma consulta no banco pelo dataset. A Consulta é +ou- assim:
dm.dataset,close;
dm.dataset.commandtext := 'select RTRIM(A3_NOME) AS A3_NOME, dt_interes_sup as dt_interes, dt_prox_contato_sup as dt_prox_contato, dt_atualiza_sup as dt_atualiza, dt_prox_vis_sup as dt_prox_vis, status_neg_sup as status_neg, case when ltrim(rtrim(dt_interes_sup)) <> '' then RIGHT(dt_interes_sup,2)+'/' +SUBSTRING(dt_interes_sup,5,2)+'/' +LEFT(dt_interes_sup,4) else dt_interes_sup end AS 'interes' , case when ltrim(rtrim(dt_prox_contato_sup)) <> '' then RIGHT(dt_prox_contato_sup,2)+'/' +SUBSTRING(dt_prox_contato_sup,5,2)+'/' +LEFT(dt_prox_contato_sup,4) else dt_prox_contato_sup end AS 'contato' , case when ltrim(rtrim(dt_atualiza_sup)) <> '' then RIGHT(dt_atualiza_sup,2)+'/' +SUBSTRING(dt_atualiza_sup,5,2)+'/' +LEFT(dt_atualiza_sup,4) else dt_atualiza_sup end AS 'atualiza' , case when ltrim(rtrim(dt_inclusao)) <> '' then RIGHT(dt_inclusao,2)+'/' +SUBSTRING(dt_inclusao,5,2)+'/' +LEFT(dt_inclusao,4) else dt_inclusao end AS 'inclusao' , case when ltrim(rtrim(dt_prox_vis_sup)) <> '' then RIGHT(dt_prox_vis_sup,2)+'/' +SUBSTRING(dt_prox_vis_sup,5,2)+'/' +LEFT(dt_prox_vis_sup,4) else dt_prox_vis_sup end AS 'prox_vis' , (select nome_usuario from user_forecast where codigo_vendedor = cod_vend_sup) as nome_sup, (select nome_usuario from user_forecast where codigo_vendedor = cod_vend_maq) as nome_maq ,prospect_carteira_sp.*, user_forecast.* from prospect_carteira_sp left join SA3110 on A3_COD = cod_vend_sup collate Latin1_General_CS_AS left join user_forecast on user_forecast.codigo_vendedor = cod_vend_sup and empresa like '%110%' where cod_vend_sup in ('V112') and delet_sup <> 'S' ORDER BY dt_inclusao desc, status_neg_sup asc';
dm,dataset.open;
só que ela traz mtos registros. Teria como fazer uma paginação, ou pelo dbgrid, ou pelo SQL Server ou por algum outro componente pra trazer somente uns 100 registros por vez? To fuçando aqui mas ate agora nenhum avanço.
Abs












