Fórum Número randomico #173804
08/08/2003
0
Me disseram para utilizar o Randomize, mas mesmo assim não deu certo!
Obrigada
Brunika!
Brunika
Curtir tópico
+ 0Posts
08/08/2003
Delphi_user
larga de c preguiçosa e pesquisa menina e ve c aprende direito tah
Gostei + 0
08/08/2003
Ivonei
function Random [ ( Range: Integer) ];
0 <= X < Range.
var
I: Integer;
begin
Randomize;
for I := 1 to 50 do begin
{ Write to window at random locations }
Canvas.TextOut(Random(Width), Random(Height), ´Boo!´);
end;
end;
[ ]´s
Gostei + 0
08/08/2003
Ivonei
function Random [ ( Range: Integer) ];
0 <= X < Range.
var
I: Integer;
begin
Randomize;
for I := 1 to 50 do begin
{ Write to window at random locations }
Canvas.TextOut(Random(Width), Random(Height), ´Boo!´);
end;
end;
[ ]´s
Gostei + 0
08/08/2003
Cebikyn
RandomRange(Inicio_do_Intervalo, Fim_do_Intervalo);
Lembre-se de colocar [b:e47747a476]Math[/b:e47747a476] na seção [i:e47747a476]uses[/i:e47747a476].
Gostei + 0
08/08/2003
Atomix
funtion Rnd(nTotal : integer):integer;
begin
Randomize;
Result := Random(nTotal);
end;
:)
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)