Ein Feld im Array zufällig anwählen

[Klaus01]

Vielleicht so?

Delphi-Quellcode:

x := random(10);
y := random(10);
case feld[x,y] of
  0 : feld[x,y]:=1;
  1 : ...
end;

grüße
Klaus