Auch Records...kann man CopyOnWrite deaktivieren?

[QuickAndDirty]

Zitat von jaenicke:

Wenn man nur eine Referenz auf ein und das gleiche Element haben möchte, kann man doch einfach Klassen und diese ggf. mit Interfaces nutzen. Das ist ja nun genau einer der Unterschiede zu Records...

Ansonsten muss man immer aufpassen, dass man es richtig macht, Pointer nutzt, usw., was dann später auf die Füße fallen kann.

Ich weiß....Ich wünschte nur es gäbe einen Umschalter....so um einfach umszustellen.
Von Records auf TInterfacedObject(für ARC-Lazyness) oder TComponent(für Aufräum-lazyness)...
Ich werde jetzt wohl an den Stellen wo es kritisch ist nicht mehr die Records übergeben sondern die Indexe die sie in den Tarray<T> dingern haben.
Ich bin so traurig.

[himitsu]

Also nicht nur eine Kopie des einen angefragten Items, sondern gleich von ALLEN.
(das Speichermanagement und die CPU freuen sich etwas tuen zu dürfen)

[QuickAndDirty]

Zitat von Uwe Raabe:

Hier mal ein Beispiel mit einer bordeigenen TList<T>. Man beachte die Verwendung von List anstatt Items:

Delphi-Quellcode:

type
  PMyRecord = ^TMyRecord;

Function RecordAusListe(aName:String) : PMyRecord;
Begin
  Result := @MyRecordLIST.List[IndexOfName(aname)];
end;

Procedure Tuwas;
var myRec:PMyRecord;
Begin
  myrec := RecordAusListe('Peter');
  myRec.Hitpoints := 5;

// oder
  RecordAusListe('Peter').Hitpoints := 5; // das compiliert im ursprünglichen Code gar nicht

end;

geht dein beispiel so
RecordAusListe('Peter').Hitpoints := 5; oder so
RecordAusListe('Peter')^.Hitpoints := 5; ??????

[QuickAndDirty]

Zitat von himitsu:

Also nicht nur eine Kopie des einen angefragten Items, sondern gleich von ALLEN.
(das Speichermanagement und die CPU freuen sich etwas tuen zu dürfen)

Es ist sooo traurig.
Vielleicht stelle ich auf TObjectlist<T> mit ownership um und alle Records zu normalen DatenObjekten....

[Uwe Raabe]

Zitat von QuickAndDirty:

geht dein beispiel so
RecordAusListe('Peter').Hitpoints := 5; oder so
RecordAusListe('Peter')^.Hitpoints := 5; ??????

Es geht beides.

[Uwe Raabe]

Zitat von QuickAndDirty:

Items ist TArray<TMyRecord>

Damit müsste es gehen. Beim Zugriff euf ein Array-Element bekommt man den originalen Record und keine Kopie. Erst der Rückgabewert von RecordAusListe ist dann eine Kopie. Mein Beispiel könnte dann so aussehen:

Delphi-Quellcode:

type
  PMyRecord = ^TMyRecord;

Function RecordAusListe(aName:String) : PMyRecord;
Begin
  Result := @MyRecordLIST.Items[IndexOfName(aname)];
end;

Procedure Tuwas;
var myRec:PMyRecord;
Begin
  myrec := RecordAusListe('Peter');
  myRec.Hitpoints := 5;

// oder
  RecordAusListe('Peter').Hitpoints := 5; // das ^ ist nicht notwendig, das denkt sich der Compiler dann.

end;

[QuickAndDirty]

Danke euch allen.

[himitsu]

Zitat:

^

Jupp, beim Zugriff via . werdem RecordPointer automatisch implizit dereferenziert.
Es kann aber natürlich dennoch explizit mit ^ dereferenziert werden.
(nur bei Objekt-Zeigern, ist das Explizite nicht erlaubt, bzw. hier wird alles immer nur implizit vom Compiler erledigt)

Da hier der Zugriff eigentlich über einen Name, anstatt via Index ... TDictionary<string,TMyRecord> bzw. TObjectDictionary<string,TMyObject>