Integer Zahlen in ein dynamisches Array randomizen lassen.

[Caspar]

Hallo, ich hab ein kleines Problem mit meinem dynamischen Array.
Ich wollte in mein dynamisches Array Zufallszahlen rein machen, dafür habe ich folgendes benutzt:

Delphi-Quellcode:

u:=0;
  setlength(ZahlSort,u,strtoint(Edit1.Text));

randomize;
  For n:=u to strtoint(Edit1.Text) do
 begin
    ZahlSort[n] := random(200);
  end;

Nun wird mir aber der Fehler angezeigt, dass es inkompatible Typen sind.
Ich hoffe ihr könnt es nachvollziehen und mir helfen :)

[Der schöne Günther]

Delphi-Quellcode:

setlength(ZahlSort,u,strtoint(Edit1.Text));

Ich glaube nicht.

[Luckie]

War Unsinn.

[Amateurprofi]

So?

Delphi-Quellcode:

setlength(ZahlSort,strtoint(Edit1.Text));
randomize;
For n:=0 to strtoint(Edit1.Text)-1 do
   ZahlSort[n] := random(200);

[Glados]

Wenn dann wenigstens so

Delphi-Quellcode:

Edit1.NumbersOnly := True; // Im ObjektInspektor einstellen oder FormCreate

var
 ArrayLen, i: Integer;
 ZahlSort: TArray<Integer>; // bzw. array of Integer;
begin
 ArrayLen := StrToIntDef(Edit1.Text, 0);

 if ArrayLen > 0 then
  begin
    SetLength(ZahlSort, ArrayLen);
    
    for i := 0 to ArrayLen - 1 do
     ZahlSort[i] := Random(200);
  end;

Zitat:

randomize;

Braucht man bei neueren Delphi-Versionen nicht, denn beim Erzeugen der Formulare wird das initial schon aufgerufen.