Boa Noite
Meu nome é Alessandro, iniciante em Delphi.
Gostaria de uma ajuda de vcs se possível.
Como faço para gerar números aleatórios que não se repitam.
Abaixo a procedure que fiz.
Estou fazendo alguns exercícios no Delphi, pois estou iniciando e no meu
programa gero um vetor dinâmico em um Edit e tudo bem,
Só que gostaria que esses números fossem aleatórios e não repetidos.
procedure Gera(var v:TArray;k:Integer);
var i : Integer;
begin
for i := 1 to k do
begin
SetLength(v,Length(v)+1);
v[i]:=Random(k);
end;
end;
Desde já agradeço
[As partes desta mensagem que não continham texto foram removidas]
