Fórum Como selecionar um ou mais registro aleatorio duma tabela #189493
18/10/2003
0
Pessoal é o seguinte. Estou fazendo um programa tipo teste, que tem uma tabela com perguntas. Ao abrir o programa o usuário pede pra gerar um teste com perguntas aleatórias. Só que eu não estou conseguindo fazer essa seleção.
Hiko Seijuro
Curtir tópico
+ 0
Responder
Posts
18/10/2003
Adilsond
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
Pergunta: array[1..5] of String;
begin
Randomize;
for I := 1 to 5 do
begin
MinhaTable.RecNo := Random(MinhaTable.RecordCount);
Pergunta[I] := MinhaTablePegunta.AsString;
end;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)