delphi - Delphiを使用した配列内のランダム値

Question

次のコードがあります。

const
   dimensions: array [1 .. 5] of string = ('100 ', '200', '300 ', '400', '500 ');

私がしていることは、その配列でランダムな値を選択して ShowMessage (); に表示することです。

しかし、それを行う方法は、配列からランダムな値を選択したときに誰かが言うかもしれません。

Answer 1

最も簡単な解決策はこれです

    myString := dimensions[Random(Length(dimensions))];

Random を使用する前にランダム シードを初期化することを忘れないでください。そうしないと、「真の」ランダム値を取得できません。

    Randomize;
    myString := dimensions[Random(Length(dimensions))];
    Showmessage(myString);