random in einer range

foxy · Verfasst: Di 11.05.04 13:00

sale leute

ma ne frage ab delphi 6 gibts ja randomrange ... damit man eben eine range bestimmen kann von zufallszahlen
aber bei delphi 5 gibts das noch nicht wie kann ich das machen wenn ich eine range von 50 - 80 abfragen will?

ich hab mir überlegt die werte ab zu fangen bei random die kleiner 50 grösser 20 sind die dann von 100 ab zu ziehen dann kommt man in den bereich 50 80 und die werte kleiner 20 und grösser 80 zu ignorieren ...

zu meiner frage geht das auf eine elegantere art und weise?

_________________
"Only wimps use tape backup: real men just upload their important stuff on ftp, and let the rest of the world mirror it." (Linus Torvalds)
OperatingSystem Laptop (Ubuntu Hardy)

Segelflieger · Beiträge: 124 WinXP Pro D7 Prof

Hallo!

probiers mal damit:

markieren

Delphi-Quelltext

1:	xyz := random(31) + 50;

random(31) liefert Zufallszahlen von 0-30. Dazu einfach 50 addieren und du bist in deinem gewünschten Bereich.

_________________
Früher hatten die Menschen Angst vor der Zukunft. Heute muss die Zukunft Angst vor den Menschen haben.

smiegel · Verfasst: Di 11.05.04 13:07

Hallo,

markieren

Delphi-Quelltext

1:
2:
3:
4:

function RandomRange(von, bis:Integer):Integer;
begin
  Result:=Random(bis-von)+von;
end; // RandomRange

Delphi macht im Prinzip auch nichts anderes.

_________________
Gruß Smiegel
Ich weiß, daß ich nichts weiß, aber ich weiß mehr als die, die nicht wissen, daß sie nichts wissen. (Sokrates)

foxy · Verfasst: Di 11.05.04 13:30

argh

da hätt ich auch drauf kommen können

dank euch auf jedenfall einfacher als meine methode

_________________
"Only wimps use tape backup: real men just upload their important stuff on ftp, and let the rest of the world mirror it." (Linus Torvalds)
OperatingSystem Laptop (Ubuntu Hardy)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme