Hi, habe jetzt nicht den kompletten Code durchgesehen, doch
Delphi-Quellcode:
function ZufallsZahl(Auswahl : Integer) : Integer;
begin
case Auswahl of
1: Auswahl := Random(9)+2;
2: Auswahl := Random(14)+2;
3: Auswahl := Random(19)+2;
end;
Result := Auswahl;
end;
diese Function gibt dir in den meisten Fällen die Zahl zurück,
die du ihr übergeben hast.
Wie intialisierst du random? Randomize?
Grüsse, MJ
//Edit: Posting nicht beachten, siehe weiter unten, sorry