From Clomosy Docs

No edit summary
No edit summary
Line 1: Line 1:
function Random():Extended;
<div class="alert alert-ligth border border-3 border-primary-subtle rounded-5 p-4 shadow-sm" role="alert">
function Random: Extended;
</div>
 
The random function generates random numbers. These can be floating-point numbers in the following range:<br>
The random function generates random numbers. These can be floating-point numbers in the following range:<br>
0 <= Number < 1.0 <br>
0 <= Number < 1.0 <br>


It can be used by calling as follows. This call will generate a decimal random number value between 0 and 1.<br>
It can be used by calling as follows. This call will generate a decimal random number value between 0 and 1.<br>
x = Random();


  x := Random();
If you want to get an integer value, define it as follows. Here it will return a random value between 0 and 100. After that, you can get values ​​as you want.<br>
  x = Random() * 100;


If you want to get an integer value, define it as follows. Here it will return a random value between 0 and 100. After that, you can get values ​​as you want.<br>
<b>Example</b><br>
<b>TRObject Syntax</b><br>
<pre>
var
  randomNumber,randomNumber2 : Integer;
 
{
  randomNumber = Random();
  randomNumber2 = Random() * 100;
  ShowMessage(randomNumber);
  ShowMessage(randomNumber2);
}
</pre>
<b>Base Syntax</b><br>
<pre>
var
  randomNumber,randomNumber2 : Integer;
 
begin
  randomNumber := Random();
  randomNumber2 := Random() * 100;
  ShowMessage(randomNumber);
  ShowMessage(randomNumber2);
end;
</pre>


x := Random() * 100;
<div class="alert alert-danger" role="alert" data-bs-theme="light">
It assigns a different value with each execution. The output will not be the same.
</div>


'''Example:'''<br>
<b>Output:</b><br>
:'''Base Syntax'''
<div class="alert alert-success" role="alert" data-bs-theme="light">
  var
0,197623564163223<br>
  MyForm:TclForm;
52,8056032489985
  btnShow : TclButton;
</div>
 
  procedure randomNumber
  var number:Float;
  begin
    number := '''Random'''() * 100;
    ShowMessage(IntToStr(number));
  end;
 
  begin
  MyForm := TclForm.Create(Self);
 
  btnShow:= MyForm.AddNewButton(MyForm,'btnShow','Random');
  btnShow.TextSettings.Font.Size:=50;
  btnShow.Align := alCenter;
  btnShow.Height := 50;
  btnShow.Width := 100;
  MyForm.AddNewEvent(btnShow,tbeOnClick,'randomNumber');
 
  MyForm.Run;
  end;


:'''TRObject Syntax'''
<h2> See Also </h2>
  var
* [[System_Library#Math_Functions | Math Functions]]
  MyForm:TclForm;
  btnShow : TclButton;
 
  void randomNumber
  var number:Float;
  {
    number = '''Random'''() * 100;
    ShowMessage(IntToStr(number));
  }
 
  {
  MyForm = TclForm.Create(Self);
 
  btnShow = MyForm.AddNewButton(MyForm,'btnShow','Random');
  btnShow.TextSettings.Font.Size=50;
  btnShow.Align = alCenter;
  btnShow.Height = 50;
  btnShow.Width = 100;
  MyForm.AddNewEvent(btnShow,tbeOnClick,'randomNumber');
 
  MyForm.Run;
  }

Revision as of 11:52, 7 October 2024

The random function generates random numbers. These can be floating-point numbers in the following range:
0 <= Number < 1.0

It can be used by calling as follows. This call will generate a decimal random number value between 0 and 1.

x = Random();

If you want to get an integer value, define it as follows. Here it will return a random value between 0 and 100. After that, you can get values ​​as you want.

x = Random() * 100;

Example
TRObject Syntax

var
  randomNumber,randomNumber2 : Integer;

{
  randomNumber = Random();
  randomNumber2 = Random() * 100;
  ShowMessage(randomNumber);
  ShowMessage(randomNumber2);
}

Base Syntax

var
  randomNumber,randomNumber2 : Integer;

begin
  randomNumber := Random();
  randomNumber2 := Random() * 100;
  ShowMessage(randomNumber);
  ShowMessage(randomNumber2);
end;

Output:

See Also

Retrieved from "http:///index.php?title=Random&oldid=2601"