Busca Aleatoria
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
Curtidas 0
Respostas
Karepa
20/02/2004
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;
GOSTEI 0
Einstein
20/02/2004
Obrigado Karepa, funcionou, basta passar a Variavel I.
Precisando estamos a disposição.
Atenciosamente,
Einstein Xavier
Precisando estamos a disposição.
Atenciosamente,
Einstein Xavier
GOSTEI 0