dynamische Array kopieren (letztes Element fehlt)

[QuickAndDirty]

Bitte sagt mir ob ich das richtig verstanden habe!

Also wird tatsächlich immer eine Referenz auf ein DynArray übergeben.
Abhängig von dem was ich danach mit der Referenz des Dnyarray mache wird unterschiedlicher Maschinencode erzeugt.

Im

Code:

 procedure KeyFooVal(arr: TStringDynArray)

Fall, wird erst beim schreiben durch "Copy on Write" eine Arbeitskopie angelegt.
Wenn ich nur lesend auf das Dynarray zugreife dann lese ich vom referenzierten Original?
Das Schreiben auf Elementen des DynArray gilt nicht als Schreibenderzugriff auf das DynArray. "Copy on Write" erfolgt nicht.
SetLength gilt als Schreiben auf das DynArray "copy on Write" erfolgt.

Im

Code:

procedure KeyFooRef(var arr: TStringDynArray);

Fall, wird auch eine Referenz übergeben aber in keinem Fall erfolgt ein "Copy on write" wenn das DynArray bearbeitet wird.

>"This is madness!"