Thema: Delphi zufallszeit generieren

Einzelnen Beitrag anzeigen

r_amse_s

Registriert seit: 31. Jul 2004
107 Beiträge
 
Delphi 11 Alexandria
 
#1

zufallszeit generieren

  Alt 31. Mai 2009, 17:48
hallo,

gibt es einen eleganten algorithmus, welches mir erlaubt floatzahlen 0 <= zahl < 1 in einem bereich generieren zu lassen?

z.b. zw. 0,32653 und 0,65380

...das natürlich ohne zu prüfen, ob die per random function erzeugte zahl im bereich liegt und wenn nicht dann erneut generieren.

ich suche also nach einer function random(low, high: double): double; die mir gleich aus dem bereich einen wert generiert.

habe was hier gefunden aber leider in C

Delphi-Quellcode:
double randDouble(double low, double high)
{
double temp;

/* swap low & high around if the user makes no sense */
if (low > high)
{
temp = low;
low = high;
high = temp;
}


/* calculate the random number & return it */
temp = (rand() / (static_cast<double>(RAND_MAX) + 1.0))
* (high - low) + low;
return temp;
}
liebe Grüße
ramsi
  Mit Zitat antworten Zitat