Einzelnen Beitrag anzeigen

Elko

Registriert seit: 2. Feb 2008
52 Beiträge
 
Delphi 7 Personal
 
#3

Re: Zufallsprinzip bei einem kleinen Spiel

  Alt 2. Feb 2008, 19:09
Also, als erstes benutzt du randomize(); um den Zufallsgenerator zu initialisieren. Dann würde ich Random(3); nutzen um eine Zufallszahl zwischen 0 und 2 zu erzeugen. Dann per case-Abfrage mit der Zufallszahl den Inhalt des Labels ändern. Hier der Code (habb ich zwar nicht ausprobiert, aber müsste aber eigentlich funktionieren):
Code:
randomize();
case random(3) of
  0: Label1.caption := 'Schere';
  1: Label1.caption := 'Stein';
  2: Label1.caption := 'Papier';
end;
Gruß, Elko
Keyboard not found. Press any key to continue.
  Mit Zitat antworten Zitat