Zugriffsverletzung beim TObjectDictionary.Add

[Stevie]

Zitat:

Eine Objektkopie mit Marshal/UnMarshal nimmt den Comparer nicht mit.

Unwesentliches Detail, was bisher fehlte

Lösung kann auch so aussehen:

Delphi-Quellcode:

TUserRoleRightDict = class(TObjectDictionary<Integer, TUserRoleRight>)
  constructor Create; overload;
end;

constructor TUserRoleRightDict.Create;
begin
  inherited Create;
end;

Dann ruft das JSON dings den richtigen ctor auf.

P.S. Das Problem wird übrigens auch bei TObjectList<T> passieren. Denn dann wird der parameterlose ctor von TList<T> aufgerufen und dann bleibt FOwnsObjects auf false. Nur als Hinweis, falls mal irgendwo massive Leaks auftreten.