Fórum Busca Aleatoria #215550
20/02/2004
0
bom dia, alguem conhece alguma funcao que busque valores em uma tabela aleatoriamente. Ex.: imagine uma tabela com 100 registros, quando eu clicar no botao pra solicitar uma busca ele me retorne o registro 50, quando clicar novamente ele retorne o registro 36, etc.
atenciosamente,
Einstein Xavier
atenciosamente,
Einstein Xavier
Einstein
Curtir tópico
+ 0
Responder
Posts
20/02/2004
Karepa
Não tenho como te passar a sintaxe corretamente, pois não tenho o Delphi instalado aqui.
mas o algoritmo seria assim.
Peque a quantidade de registros de sua tabela ou query e faça uma busca randómica.
acho que é assim
var
i, Ret : Integer;
begin
Query1.open;
i := Query1.RecordCount;
Ret := Random(1;i); // Verifique a sintaxe no Help do Delphi.
Query1.RecNo := Ret;
end;
mas o algoritmo seria assim.
Peque a quantidade de registros de sua tabela ou query e faça uma busca randómica.
acho que é assim
var
i, Ret : Integer;
begin
Query1.open;
i := Query1.RecordCount;
Ret := Random(1;i); // Verifique a sintaxe no Help do Delphi.
Query1.RecNo := Ret;
end;
Responder
Gostei + 0
20/02/2004
Einstein
Obrigado Karepa, funcionou, basta passar a Variavel I.
Precisando estamos a disposição.
Atenciosamente,
Einstein Xavier
Precisando estamos a disposição.
Atenciosamente,
Einstein Xavier
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)