random
26/12/2005
0
amigos,
gostaria q alguem me refrescasse a memoria de como usar o comando random... a sintaxe.... em delphi
vlw
Antonio Mexas
gostaria q alguem me refrescasse a memoria de como usar o comando random... a sintaxe.... em delphi
vlw
Antonio Mexas
Antonio.mexas
Curtir tópico
+ 0
Responder
Posts
26/12/2005
Eixox
vai para...
var
a: Integer;
begin
Randomize;
for a := 1 to 100 do
begin
Listbox.items.add(IntToStr(Random(100)));
end;
end;
Você também pode utilizar a função
function RandomRange(const AFrom, ATo: Integer): Integer;
Onde AFrom: é o número inicial - Ex: 10
e ATo é o valor final - Ex: 1000
Neste caso, a função ficará assim: RandomRange(10, 1000);
Falou....
var
a: Integer;
begin
Randomize;
for a := 1 to 100 do
begin
Listbox.items.add(IntToStr(Random(100)));
end;
end;
Você também pode utilizar a função
function RandomRange(const AFrom, ATo: Integer): Integer;
Onde AFrom: é o número inicial - Ex: 10
e ATo é o valor final - Ex: 1000
Neste caso, a função ficará assim: RandomRange(10, 1000);
Falou....
Responder
Clique aqui para fazer login e interagir na Comunidade :)