Thema: Delphi Mischen Funktion

Einzelnen Beitrag anzeigen

testzugang

Registriert seit: 14. Sep 2004
9 Beiträge
 
#5

Re: Mischen Funktion

  Alt 16. Sep 2004, 16:41
Zitat von Anthauri:
Hi!

Auf den ersten Blick erscheint die "Random" Funktion die richtige Wahl, die eine Ganzzahl zurückgibt.

 Ergebnis := random(IconZahl-1) + 1; // ergibt einen Wert zwischen 0 und 29 + 1 also 1 bis 30
Randomize; und Random sind ja kein Problem, das Problem ist, Random muss solange laufen, bis alle Zahlen genau! 1 mal verteilt worden sind.

MfG
  Mit Zitat antworten Zitat