Hallo,
@sx2008: Das die Random() Function überladen ist, ist mir bekannt, allerdings wenn man einen Werte-Bereich angibt werden nur Interger-Zahlen zurückgegeben.
@Medium: Danke erst mal für ausführliche Informationen. Die erste Funktion müsste nur geändert werden um die Nachkomma-Stellen als Integer zu bekommen.
Geändert:
Delphi-Quellcode:
function dZufallsZahlen(Von, Bis: Integer): Double;
var
KommaStellen: Integer;
begin
KommaStellen := trunc(Power(10, random(8))*10);
Result := iZufallsZahlen(Von*KommaStellen, bis*KommaStellen)/KommaStellen;
end;
Nach einem kurzen Test funktioniert sie wunschgemäß.
Es sollen Zahlen zwischen -1000 und 100000 generiert werden, da sollte der Werte-Bereich noch funktionieren.
Der String der erstellt wird von der Zufallszahl soll unterschiedliche Länge haben und nicht mit Nullen aufgefüllt werden.
Zitat:
Alles andere wäre Rumgehackel und bestenfalls ein "dirty trick", aber nichts zum vorm Chef damit glänzen
Beim Programmieren bin ich mein eigener Chef.
Bis bald Chemiker