Uso de Random
 

Hola yo de nuevo

quiero usar el random en delphi 7, bueno no se como hacerlo, pero que se limite en numero de 1 al 10.

se da click en aceptar y muestra un numero aleatorio, pero nunca repetido, es alazar, saludos

Ver imagen

Hola
Hay que colocar ( Math ) en el uses.

Begin
Randomize;
Edit1.Text:= FloatToStr(RandomRange(1, 10));

Tal vez te sirva
Saludos

Nota: No pude colocar las etiquetas.

Tambien se puede sin la unidad Math,

Código Delphi [-]
...
 
 Edit1.Text:= IntToStr(Random(10) + 1);
 
...

Saludos!

Quisera agregar a lo aportado que para conseguir no repetidos te fijes en esta búsqueda. El tema fue tratado en ocasiones.

Saludos,

Creo que tu busqueda no esta disponible para nosotros los mortales:rolleyes:... danos un resumen para que arespremium entienda, supongo que es con RandSeed y Randomize no???

Pues que curioso... no pude entrar a la búsqueda...:confused:

Bueno, preparé un ejemplo sencillo, hecho "a medida" para los primeros 10 números.

Código Delphi [-]
type
TNro10 = 1..10;
TTiradas = set of TNro10;

procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
  i := Random(10) + 1;
  if i in Tiradas
     then ShowMessage('Nro ya repetido: '+IntToStr(i))
     else begin
            include(Tiradas,i);
            ShowMessage('El número es: '+IntToStr(i));
          end;
end;

Espero que sirva de algo... para darse una idea creo que sirve.

Saludos,