Magische 21

[Kalakmul]

Hallo Jan,

beim ersten Drüberschauen ist mir folgendes aufgefallen:

1. Da Augenzahlen beim Würfeln immer Ganzzahlen sind, solltest Du statt Real eher Integer als Datentyp nehmen. Entsprechend dann Befehle wie StrToInt verwenden! Falls es beim Randombefehl deshalb Probleme mit dem Datentyp gibt, einfach einen Trunc-Befehl um die rechte Seite legen (schneidet eine Kommazahl hinter dem Komma ab und macht sie zum Integer).

2. Die in der Prozedur verwendeten Variablen sind lokal definiert, d. h. wenn Du sie nicht explizit belegst, können darin Zufallswerte stehen. Du solltest die Variablen wSumme und wVorher global (im Variablendeklarationteil des Programms) definieren, da sie über die "Lebensdauer" eines Clickereignisses hinaus präsent sein sollen. wAugenzahl kann dagegen lokal definiert bleiben, da es eh bei jedem Click neu belegt wird.

3. Muss es nicht: wSumme := wSumme + wAugenzahl heißen?

Hoffe das hilft Dir!