Eu ia esperar pra comprovar amanhã, quando ia testar no Delphi, mas acho que usando assim como passado, o resultado sempre será o mesmo. Se não me engano, Randomize é somente um inicializador do gerador de números randômicos, por isso deve ser chamado apenas uma vez, como bem disse o João.
Atte, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em seg, 7/12/09, Joao Morais <jcmorai...@gmail.com> escreveu: De: Joao Morais <jcmorai...@gmail.com> Assunto: Re: [delphi-br] Dúvida com Sorteio (Random) Para: delphi-br@yahoogrupos.com.br Data: Segunda-feira, 7 de Dezembro de 2009, 22:26 2009/12/7 Leandro <mutu...@yahoo. com.br>: > esse nao eh um metodo bom para se gerar um randomico.. pois a função random > na verdade nao eh randomica rsrs dificil de entender ne!.. > > faça o teste colocando: > > result := ''; > for I := 1 to VTamanho do > Begin > Randomize; > result := result + Copy(VMatriz, random(Length( VMatriz)) ,1); > End; Use o randomize uma única vez, fora do laço. Melhor ainda se for executado uma única vez na inicialização do programa. Joao Morais ____________________________________________________________________________________ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]