Hiho
hab da mal ne kleine Frage! Hier ist mein Code um zufällig Zahlen von 1 zu Maxelements (in meinem Fall 300) zu erstellen. Funktioniert ohne Probleme.
Delphi-Quellcode:
begin
memo1.clear;
image1.canvas.brush.color := clblack;
image1.canvas.Rectangle(0,0,image1.width,image1.height);
for i:= 1 to maxelements do begin
p[i] := random(maxelements);
image1.canvas.Pixels[i,p[i]] := clyellow;
end;
Doch wie muss ich den Code umschreiben, dass keine Zahl doppelt vorkommen darf, was ja hier der Fall ist!
Danke im Voraus
Trouble_Maker