AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Zugriffsverletzung beim TObjectDictionary.Add

Zugriffsverletzung beim TObjectDictionary.Add

Ein Thema von haentschman · begonnen am 8. Okt 2019 · letzter Beitrag vom 14. Okt 2019
Antwort Antwort
Seite 2 von 3     12 3   
Incocnito

Registriert seit: 28. Nov 2016
16 Beiträge
 
#11

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 9. Okt 2019, 07:09
Objektkopie?
Hat das Objekt ein "Assign", oder wie genau?
Delphi-Quellcode:
StringList1 := TStringList.Create();
StringList2 := StringList1;
StringList1.Free();
StringList2.Add('Something'); // <- Alles Kaputt, so geht das natürlich nicht!
Für den höchst unwahrscheinlichen Fall, dass du das meintest.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
4.246 Beiträge
 
Delphi 10.1 Berlin Professional
 
#12

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 9. Okt 2019, 07:24
Zitat:
Hat das Objekt ein "Assign", oder wie genau?
Normal macht man das klassisch mit Assign. Meine "Datenobjekte" haben auch Listen mit Objekten. Deshalb benutze ich gern folgendes:
Delphi-Quellcode:
class function TToolsJson.ObjectCopyJson(Value: TObject): TObject;
var
  MarshalObj: TJSONMarshal;
  UnMarshalObj: TJSONUnMarshal;
  JSONValue: TJSONValue;
begin
  Result := nil;
  MarshalObj := TJSONMarshal.Create;
  try
    UnMarshalObj := TJSONUnMarshal.Create;
    try
      JSONValue := MarshalObj.Marshal(Value);
      try
        if Assigned(JSONValue) then
          Result := UnMarshalObj.Unmarshal(JSONValue);
      finally
        JSONValue.Free;
      end;
    finally
      UnMarshalObj.Free;
    end;
  finally
    MarshalObj.Free;
  end;
end;
...nur leider funktioniert das nicht immer. Wie man an dem o.g. Fehler erkennen kann, werden Dictioniaries nicht wieder richtig erzeugt. Ich habe deshalb wieder nur auf Liste umgestellt.

Geändert von haentschman (10. Okt 2019 um 05:51 Uhr)
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
5.009 Beiträge
 
Delphi 10 Seattle Enterprise
 
#13

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 9. Okt 2019, 09:00
Moin...
Zitat:
Eine Idee habe ich noch...aber erst morgen früh.
...Fazit: Eine Objektkopie mit Maschal/UnMarschal nimmt den Comparer nicht mit.
Ja, leider.
Siehe auch hier:
https://stackoverflow.com/a/49636496/2298252
  Mit Zitat antworten Zitat
Incocnito

Registriert seit: 28. Nov 2016
16 Beiträge
 
#14

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 9. Okt 2019, 15:32
Sowas geht auch nur ansatzweise?
Ich hätte gesagt, da es sich ja nur um den Typen "TObject" handelt,
weiß Delphi eh nicht, was zu tun ist und stellt nur irgendeinen Mist her.
Ich bin total verwirrt! Das ist für mich schon quasi EDV-Magie!
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
7.013 Beiträge
 
Delphi 10.3 Rio
 
#15

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 9. Okt 2019, 15:39
Das ist für mich schon quasi EDV-Magie!
Das dazugehörige Zauberwort heißt RTTI.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
4.246 Beiträge
 
Delphi 10.1 Berlin Professional
 
#16

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 10. Okt 2019, 05:51
Moin...
Zitat:
Ich hätte gesagt, da es sich ja nur um den Typen "TObject" handelt,
Du bekommst schon das raus was du reinsteckst. Du mußt nur das Ergebnis TObject auf deinen Typ casten.
BlubbCopy := TBlubb(TTools.ObjectCopy(Blubb));
  Mit Zitat antworten Zitat
generic

Registriert seit: 24. Mär 2004
Ort: bei Hannover
2.188 Beiträge
 
Delphi XE5 Professional
 
#17

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 10. Okt 2019, 10:01
Bitteschön...
FRoleRightDict := TUserRoleRightDict.Create([doOwnsValues]); // gleicher Fehler
Wenn ich mir die Exception und den Stacktrace anschaue, dann glaube ich eher das es am KEY liegt.
Ähnlich wie bei den Values, kann auch der KEY owned werden.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
4.246 Beiträge
 
Delphi 10.1 Berlin Professional
 
#18

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 10. Okt 2019, 10:09
Zitat:
Wenn ich mir die Exception und den Stacktrace anschaue, dann glaube ich eher das es am KEY liegt.
Dem widerspricht die fast tägliche Benutzung / Implementierung eines Dictionaries. Die diesem Falle war aber eine Objektkopie des Datenobjektes mit enthaltenem Dictionary verantwortlich. Mit der Kopie ist der FComparer intern nicht instanziert worden.

Danke...

Geändert von haentschman (10. Okt 2019 um 10:13 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
7.013 Beiträge
 
Delphi 10.3 Rio
 
#19

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 10. Okt 2019, 11:40
diesem Falle war aber eine Objektkopie des Datenobjektes mit enthaltenem Dictionary verantwortlich. Mit der Kopie ist der FComparer intern nicht instanziert worden.
Das liegt vermutlich daran, daß nicht der gewünschte Construktor von TDictionary aufgerufen wurde, sondern der von TObject, weil UnMarshal nach einem parameterlosen Constructor sucht. Und Interface-Felder werden offenbar nicht serialisiert.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
4.246 Beiträge
 
Delphi 10.1 Berlin Professional
 
#20

AW: Zugriffsverletzung beim TObjectDictionary.Add

  Alt 10. Okt 2019, 11:44
Zitat:
Und Interface-Felder werden offenbar nicht serialisiert.
...genau.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf