Hey,
ich habe mit Hilfe von Random(32) einen Roulette Simulator in Delphi erstellt.
Die eigentliche Auswertung einer Zufallszahl geschieht folgendermaßen:
randomize;
x:=random(32);
Das Interessante, wesswegen ich es auch programmieren wollte ist, dass ich einen Knopf habe, der nach dem Prinzip spielt: Sobald ich verliere, verdoppel ich den Einsatz, wenn ich dann einmal gewinne gehe ich wieder auf den Mindesteinsatz, wobei der Mindesteinsatz 2 Euro ist und der Maximaleinsatz 1000 beträgt. Ich kann einstellen, wieoft er pro Klick drehen und nach dem Prinzip setzen soll.
Das Problem:
Wenn randomize bei Form.create steht bekomme ich bei 100000 Versuchen immer eine negative Gesamtbilanz, das heißt, ich mache Verlust. Wenn ich aber Randomize direkt vor dem Auswürfeln der random Zahl mache, so wie ich es oben stehen habe, dann wird die Gesamtbilanz in jedem Fall negativ.
Ich habe Randomize jetzt zweimal hingeschrieben, bin mir aber unsicher, was es nun bewirkt. Ich bekomme jetzt nämlich immer eine positive Gesamtbilanz und das macht mich schon ein wenig stuzig!
Bevor ich also ins Casino gehe und mein Geld verzocke:
Wie bekomme ich eine wirklich zufällige Zahlenreihenfolge hin?
Bedanke mich schon im Vorraus!
lg
LPIG