dica de random
gostaria de saber como eu faço para sortear 300 numeros de processos juridicos,em quantidades iguais para 15 procuradores.
será que vc pode me ajudar,com dicas,alguma fonte de consulta,alguma função que vc conheça ou tenha qu faça algo parecido.
desde ja agradeço !!!!!!1
será que vc pode me ajudar,com dicas,alguma fonte de consulta,alguma função que vc conheça ou tenha qu faça algo parecido.
desde ja agradeço !!!!!!1
Jiu
Curtidas 0
Respostas
Emacruz
21/07/2003
Não entendi direito sua pergunta.. porque vc não tenta algo do tipo.. eh simples mas pelo q eu entendi deve funcionar..
function tFrmPrincipal.Sort : String ;
var ct : Integer ;
begin
Result := ´´ ;
Randomize;
for ct := 1 to 15 do Result := Result + IntToStr( Random(9) ) ;
end ;
Falow,
Emanuel.
function tFrmPrincipal.Sort : String ;
var ct : Integer ;
begin
Result := ´´ ;
Randomize;
for ct := 1 to 15 do Result := Result + IntToStr( Random(9) ) ;
end ;
Falow,
Emanuel.
GOSTEI 0