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?