ja, das war schon klar
habs jetzt so drinstehn:
Delphi-Quellcode:
randomize;
for lauf := 1 to 16 do
begin
zufall := random(15)+1;
while karte[zufall] > 0 do
zufall := random(15)+1;
karte[zufall] := lauf;
end;
das problem das jetzt da ist, ist das er sich immer aufhängt wenn ich es starten will.
ich muss dann das programm immer zurücksetzen...
weis einer woran das liegen könnte? es sieht irgendwie so aus als ob er in ner endlosschleife wäre, aber das kann doch eigtl nicht sein, oder?