Original einer Matrix wird mit Kopie überschrieben..?!

[lurchlarve]

...hat sich erledigt!

Habe gerade das gelesen

Code:

dynamisches Array: 
  Elemente primitive Datentypen: Copy-Befehl 
  Elemente Referenzdatentypen: Elemente einzeln kopieren 
statisches Array: 
  Elemente primitive Datentypen: einfache Zuweisuung des einen Arrays
                                 zum anderen 
  Elemente Referenzdatentypen: Elemente einzeln kopieren

Also komme ich wohl nicht darum, es so zu machen, oder?

Delphi-Quellcode:

procedure TTouren.Saving_Algorithmus;
var SMatrix2 : MyMatrix;
     SortArr : TSortArr;
         i,j : integer;
           E : integer;
         y,z : TTourDef;
         w,x : TKnotenDef;
         Kap : integer;
begin
  SetLength(SMatrix2,n ,n );
  for i := 0 to high(SMatrix) do
  begin
    for j := i+1 to high(SMatrix) do
    begin
      SMatrix2[i,j] := SMatrix[i,j];
    end;
  end;
  SortArr := get_TopValue(SMatrix2);
end;

Manchmal findet man doch plötzlich von selber mal den richtigen Tipp im Netz!

Gruß,

Björn