Dynamischen Array zuweisen

[glkgereon]

hi

ich "ordne" einen dynamischen array neu, und will danach den temporären in den "normalen" reintun.

leider kommt da ne av an adresse sonstwieviel...

Delphi-Quellcode:

procedure TChars.MakeValues;
var i, j, TIndex, TAnzahl:Integer;
    NewVals: TDynIntArray;
begin
  SetLength(NewVals, FCount);
  TIndex:=0;
  TAnzahl:=0;
  for j:=1 to FCount do
    begin
    for i:=1 to FCount do
      if TAnzahl<FAnzahl[i] then
        begin
        TAnzahl:=FAnzahl[i];
        FAnzahl[i]:=0;
        TIndex:=i;
        end;
    NewVals[j]:=TIndex;
    end;
  FVal:=NewVals;//<--- Hier!!!
//  for i:=1 to FCount do FVal[i]:=NewVals[i];
end;

wie ihr seht habe ich es auch schon umständlich versucht, funzt aber auch net

beide Arrays sind mit SetLength(FVal,FCount) initialisiert und (natürlich) vom selben typ (array of Integer).

weiss einer wos dran liegen könnte?

[shmia]

Delphi-Quellcode:

FVal := Copy(NewVals,0, Length(NewVals));

[Dax]

Bist du schonmal durchgesteppt, ob die AV auch von dem Array herrührt? Normal müsste das einwandfrei funktionieren.

[glkgereon]

ja, ich bin durchgesteppt.

es liegt an der zuweisung...werd das copy mal probieren

[Binärbaum]

Es leigt am Index des dyn. Arrays:
Der beginnt bei immer null und "läuft" bis Lenght-1.
Deswegen muss es statt

Delphi-Quellcode:

for j:=1 to FCount do ...

so heißen

Delphi-Quellcode:

for j:=0 to FCount-1 do ...

MfG
Binärbaum