Random Befehl spielt verrückt

[abrosda]

Jupp sorry, hab den Quellcode nur halb gelesen

Nimm RandomRange(1,6), wenn vorhanden, oder probier es mit:

f := Round(Random(6)+1);

und wenn immer noch Werte fehlen, bau noch einen else Zweig ein und lass Dir den Wert anzeigen...