Default Value bei eigenen Typ

[himitsu]

Delphi-Quellcode:

var S1, S2: string;
S1 := 'abcd';
S2 := S1;
S2[2] := 'B';
ShowMessage(S1 + sLineBreak + S2);  // abcd aBcd

var B1, B2: TBytes;
B1 := (1, 2, 3, 4);
B2 := B1;
B2[1] := 22;
// Arrays ausgeben > BEIDE (1, 22, 3, 4)

Bei Strings gibt es RefCount=-1 für Konstanten.