|
Registriert seit: 3. Jan 2007
Ort: Dresden
3.443 Beiträge
Delphi 7 Enterprise
|
Re: Zufallszahl mit Ausnahme
4. Apr 2008, 14:42
Delphi-Quellcode:
const Zufallszahlen:array[0..7] of byte=(1,2,4,6,7,8,9,10);
...
Zahl:=Zufallszahlen[random(8)];
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
|
|
|
Zitat
|