Einzelnen Beitrag anzeigen

Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.858 Beiträge
 
Delphi 11 Alexandria
 
#1

Zufallsgleitkommazahlen mit zufälligen Nachkommastellen

  Alt 14. Jul 2008, 22:53
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.
  Mit Zitat antworten Zitat