Hallo,
Ich benutze diese beiden Funktionen um Zufalls-Gleitkommazahlen in einem bestimmten Bereich zu bekommen.
Delphi-Quellcode:
function iZufallsZahlen(Von, Bis: Integer): integer;
begin
Result:= RandomRange(Von, Bis+1);
end;
function dZufallsZahlen(Von, Bis: Integer): Double;
begin
Result:= iZufallsZahlen(Von*100, bis*100)/100;
end;
Mit diesen Funktionen bekomme ich Gleitkommazahlen immer mit 2 Nachkommastellen, ich würde aber gerne auch die Nachkommastellen durch den Zufallsgenerator laufen lassen, so dass ich immer Nachkommastellen von 0 bis 8 bekomme.
Hat einer eine Idee, wie man das am besten realisieren kann?
Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.