<Random>乱数関数

0~10の数値をランダムに表示する

使用する関数

乱数生成関数を初期化
→ Randomize
乱数を生成
→ Random

サンプルソース

procedure TForm1.Button1Click(Sender: TObject);
var
　Ramdom_Int : integer;
begin
　//乱数生成関数を初期化
　Randomize;
　//0～10までの数値を生成
　Ramdom_Int := Random(11);
　//メッセージボックスへ
　ShowMessage(Ramdom_Int.toString);
end;