Arrays mittels Move( ) verkleinern

[Saulmann]

Hallo liebe Delphi-Gemeinde,

mich plangt gerade ein Problem wo ich nicht so recht hintersteige

Ich habe zwei Datenstrukturen: Zum einen habe einen Array of Record und zum anderen eine Matrix.
Diese Fülle ich mit Daten. Das läuft soweit alles glatt.
Jetzt gehe ich die Matrix durch und schaue in jeder Zeile ob da ein String 'geld' vorkommt. Falls dies zutrifft, soll diese Zeile gelöscht werden. D.h. die folgenden Zeilen/Daten in beiden Datenstrukturen aufrücken und die betroffene Zeile somit löschen/überschreiben und zuguter letzt die Länge der Strukturen kürzen:

Delphi-Quellcode:

type
  TRecord = record
    id: Integer;            
    timestamp: String;
    nr: Integer;
  end;

var
  meinRecord: array of TRecord;
  matrix: array of array of String;

In meinem Programm gehe ich so vor

Delphi-Quellcode:

SetLength(meinRecord, x); // beide Datenstrukturen haben die gleiche anzahl von Zeilen (Länge x)
SetLength(matrix, x);
for i := 0 to x-1 do
begin
  meinRecord[i] := ...; // fülle mit daten
  SetLength(matrix[i], y); // unbekannte Länge y
  for k := 0 to y-1 do
  begin
    matrix[i][k] := ...; // fülle mit daten
  end;
end;

...

n := 0;
count := 0;
for i := 0 to length(meinRecord)-1 do
begin
  m := true;
  for k := 0 to length(matrix[n])-1 do
  begin
    if (matrix[n][k] = 'geld') then
    begin
      Move(meinRecord[n+1], meinRecord[n], SizeOf(meinRecord[0])*(Length(meinRecord)-n-1));
      SetLength(meinRecord, Length(meinRecord)-1);
      Move(matrix[n+1], matrix[n], SizeOf(matrix[0])*(Length(matrix)-n-1));
      SetLength(matrix, Length(matrix)-1);
      n := i - count;
      m := false;
      count := count + 1;
      break;
    end;
  end;
  if m = true then
    n := i + 1 - count;
end;

Bei meinem Record funktioniert auch alles glatt, nur die Matrix spinnt rum. Scheinbar überschreibt er die betroffene Zeile korrekt, aber sobald die letzte Zeile gelöscht wird um die Matrix zu verkürzen, ist die überschriebene Zeile wieder leer.
Meine Vermutung: call by reference -> sobald die letzte Zeile gelöscht wird, werden auch die daten der neu überschriebenen Zeile gelöscht.
Liege ich mit meiner Vermutung richtig? Wie kann ich diesen Fehler beheben?

Viele Grüße
Saul