como usar RANDOMIZE

[marcoszorrilla]

Aquí tienes un ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
   I: Integer;
 begin
   Randomize;
   for I := 1 to 50 do begin
     { Write to window at random locations }
     Memo1.Lines.Add(IntToStr(Random(11)) );
   end;
 end;

En Delphi 5 y 7 no es necesario incluir ninguna unidad, porque está en la unidad System.


Un Saludo