Localizar o proximo registro e o anterior em SQL

Delphi

30/06/2003

Ola,

alguem sabe como se faz em SQL para ler o proximo registro e o anterior, eu fiz um loop e funciona so que o programa fica muito lento, e eu nao queria ter que usar o loop. :(

DM_DADOS.Qry_VEN.Active := False;
DM_DADOS.Qry_VEN.SQL.Clear;
DM_DADOS.Qry_VEN.SQL.Add(´SELECT * FROM VEN WHERE COD = ´´´+ xCodigo1 +´´´;´);
DM_DADOS.Qry_VEN.Prepare;
DM_DADOS.Qry_VEN.Active := True;


Claudio_f

Claudio_f

Curtidas 0

Respostas

Ildefonso

Ildefonso

30/06/2003

Olá, Claudio.

De onde você vai tirar o xCodigo1 ?

Em todo caso, você pode abrir uma SQL mais genérica e criar uma expressão WHERE para a propriedade .Filter do TQuery.

Dessa forma, os métodos FindFirst, FindLast, FindNext, FindPrevious vão deslocar o ponteiro entre os registros. Note que a propriedade Filtered deve ser atribuída para False!!!

Bom trabalho. 8)


GOSTEI 0
Ildefonso

Ildefonso

30/06/2003

Olá, Claudio.

De onde você vai tirar o xCodigo1 ?

Em todo caso, você pode abrir uma SQL mais genérica e criar uma expressão WHERE para a propriedade .Filter do TQuery.

Dessa forma, os métodos FindFirst, FindLast, FindNext, FindPrevious vão deslocar o ponteiro entre os registros. Note que a propriedade Filtered deve ser atribuída para False!!!

Bom trabalho. 8)


GOSTEI 0
Jorge Ferreira

Jorge Ferreira

30/06/2003

Para voce ler o registro de forma mais simples use o select .
Exemplo. Ler o Proximo sequencialmente =>
select * from TABELA where campo > (ultimo campo que vc leu) order by campo ASC.

voce tera aqui o proximo registro

Para ler o anterior, é so mudar de ASC para DESC e inverter o sinal ex.
select * from TABELA where campo < (ultimo campo que vc leu) order by campo DESC.
GOSTEI 0
POSTAR