random mit selbst definierten Zahlen

[jottkaerr]

Zitat von DeddyH:

Delphi-Quellcode:

const MeinArray: array[0..3] of integer = (17,23,67,89);
begin
  ShowMessage(IntToStr(MeinArray[Random(3)]));
end;

Random(4) wäre besser. Und noch besser wäre Random(Length(MeinArray)) oder gar
MeinArray[Low(MeinArray) + Random(Length(MeinArray))] Dann ist man unabhängig von den tatsächlichen Arraygrenzen.

jkr