Hi,
in meinem Programm will ich ein Feld mit einigen Punkten füllen. Diese sollen zufällig verteilt werden.
Jedoch werden die Punkte alle auf eine Linie gelegt, zwar mit unterschiedlichen Abständen aber alle auf eine Linie.
Ich habs jetzt mit vier Methoden versucht, aber alle erzeugen das selbe Ergebnis.
In der MEthode FormResize rufe ich schon randomize auf.
ich hoffe ihr könnt mir weiterhelfen.
Anbei ist mein QT mit den drei Möglichkeiten die ich bereits ausprobiert hab.
Vielen dank im vorraus!
mfg
Spezi
Delphi-Quellcode:
Punkt : Array of Array of Integer;
...
for i:=0 to High(Muenze) do
begin
Punkt[i][0]:=round(random((25)+Paintbox1.Width));
Punkt[i][0]:=round(random((25)+Paintbox1.Height)); (*
Punkt[i][0]:=round(random*(Paintbox1.Width-50)+25);
Punkt[i][1]:=round(random*(Paintbox1.Height-50)+25);(*
Punkt[i][0]:=round(Math.RandomRange(10,Paintbox1.Width-30));
Punkt[i][1]:=round(Math.RandomRange(10,Paintbox1.Height-30));*)
end;