Thema: Keine Kopie?

Einzelnen Beitrag anzeigen

freimatz

Registriert seit: 20. Mai 2010
1.443 Beiträge
 
Delphi 11 Alexandria
 
#1

Keine Kopie?

  Alt 4. Mai 2022, 08:31
Bislang dachte ich, dass dynamisches Arrays wie String behandelt werden. Also wenn diese irgendwohin übergeben werden, dass dann eine Kopie erstellt wird (sofern nötig). Nach Analysen in unsrem Code habe ich einen möglichst einfachen Test erstellt. Folgender Test macht mich ratlos:
Delphi-Quellcode:
unit TestArray;

interface

uses
  System.Classes,
  System.Generics.Collections;

implementation

procedure Test_Array1();
type
  TValueArray = array of Char;
var
  item: TValueArray;
  list: TList<TValueArray>;
begin
  list := TList<TValueArray>.Create();
  SetLength(item, 2);

  item[0] := '1';
  item[1] := '2';
  list.Add(item);
//Watch Name   Value
//list[0]   ('1', '2')

  item[0] := '5';
  item[1] := '4';
  list.Add(item);
//Watch Name   Value
//list[0]   ('5', '4')
end;

initialization

Test_Array1();
halt;

end.
Wir gingen bislang davon aus, dass bei der Übergabe bei "list.Add(item);" eine Kopie übergeben wird. Dem ist scheinbar nicht so.
Wo ist der Denkfehler? (D11)

Nachtrag:
Ich glaub ich habs: https://docwiki.embarcadero.com/RADS...amische_Arrays
Im Gegensatz zu Strings und statischen Arrays wird copy-on-write nicht für dynamische Arrays verwendet.

Geändert von freimatz ( 4. Mai 2022 um 09:23 Uhr)
  Mit Zitat antworten Zitat