Rapaz, ele é da família sim, mas eu não conheço.

-----Mensagem original-----
De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Número randômico entre x e y


Funcionou...valeu rodrigo.

P.S.: Algum parentesco com o Darci Villaverde (violonista)?
----- Original Message -----
From: "Rodrigo Villaverde" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Thursday, February 17, 2005 9:31 AM
Subject: RES: [delphi-br] Número randômico entre x e y



function NumeroRandomicoIntervalo(LimiteInferior, LimiteSuperior: Integer):
Integer
var
NumeroAleatorio: Integer;
begin
  Randomize;
  repeat
    NumeroAleatorio:= Random(LimiteSuperior);
  until NumeroAleatorio >=  LimiteInferior;
  NumeroRandomicoIntervalo:= NumeroAleatorio;
end;

-----Mensagem original-----
De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 17 de fevereiro de 2005 09:17
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Número randômico entre x e y


Folks,

Preciso gerar um número randômico q esteja dentro de um intervalo. Exemplo:

Números aleatórios entre 10 e 20
11, 19, 15....

Sei utilizar a função random, mas esta me permite apenas estabelecer o
limite superior...e o limite inferior? Alguém sabe?

[ ]'s

Rodrigo


[As partes desta mensagem que não continham texto foram removidas]



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos











--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos















-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos




 






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a