MemoryLeak in Nexus?

[haentschman]

Hallöle...
Ich hab mal was merkwürdiges hier...:

Beispielkonstrukt:

Delphi-Quellcode:

function DataModule.CreateData: TDataSet;
begin
  Result := TNxQuery.Create(nil);
  Result.SQL.Text := 'Blubb';
  Result.Open;
end;
...
procedure Anwendung.ReadData;
var
  I: Integer; 
  Data: TDataSet;
begin
  Data := DataModule.CreateData;
  try
    while not Data.Eof do
    begin
      ...Lesen  
    end; 
  finally
    Data.Free;
  end;
end;

Ich habe bei allen diesen Konstrukten ein Speicherleck. Habe ich was übersehen? Die Zeile 321 enthällt den Aufruf zu DataModule.CreateData
Oder veräppelt mich der MadExcept?

Danke.

[Uwe Raabe]

Ist TNexusQuery von dir? Das Original heißt meines Wissens TNxQuery.

[haentschman]

Moin Uwe...

Zitat:

Das Original heißt meines Wissens TNxQuery.

...richtig. Die verwende ich auch. Für das Beispiel fand ich das ausreichend.

Nachtrag: Änderung TNxQuery im Beispielkonstrukt.

[mm1256]

Hallo,

ist das Beispiel vollständig? Ich frag nur, weil du den Constructor der TnxQuery aufrufst, aber freigeben tust du ein TDataSet.

BTW ich verwende die NexusDB schon seit Version 1.14 aber Probleme mit MemoryLeaks hatte ich noch nicht. Thorsten macht hier wirklich einen sehr guten Job

[haentschman]

Moin...

Zitat:

weil du den Constructor der TnxQuery aufrufst, aber freigeben tust du ein TDataSet.

...TnxQuery stammt von der Hierachie des TDataSet ab. Siehe auch Screenshot: Data.DB ... TDataSet.Open Der Pointer auf die Instanz ist die gleiche. Also ist das Freigeben auch so richtig...

Nachtrag:
Ich denke hier veräppelt mich der MadExcept. Ein Beenden mit ReportMemoryLeaksOnShutdown := True bringt kein Leak bis auf den UnicodeString den ich testweise eingefügt habe.

[mm1256]

Sehe ich ganz anders. Du erzeugst eine Instanz der TnxQuery, deren Teilmenge von der Objekthierarchie ein TDataSet ist. Das ist richtig, darum funktioniert das auch. Aber bei der Freigabe wird lediglich der Destructor des TDataSet aufgerufen, und NICHT der Destructor der TnxQuery. Das muss leaken, was sonst. Die Speicheradresse ist die selbe, aber...deine Frage war ja "Habe ich was übersehen?".

[FaTaLGuiLLoTiNe]

Das dürfte eigentlich kein Problem sein, da der Destruktor immer virtuell ist.

[samso]

Zitat von mm1256:

Aber bei der Freigabe wird lediglich der Destructor des TDataSet aufgerufen, und NICHT der Destructor der TnxQuery.

Das kann ich aber nur glauben, wenn bei dem Destructor von TnxQuery das override vergessen worden wäre. Ansonsten sorgt die Vererbung für den korrekten Aufruf des richtigen Destructors.

[haentschman]

Danke an Alle...

Zitat:

Das dürfte eigentlich kein Problem sein, da der Destruktor immer virtuell ist.

Zitat:

Ansonsten sorgt die Vererbung für den korrekten Aufruf des richtigen Destructors.

...sehe ich auch so.

[Rollo62]

https://www.nexusdb.com/Support/index.php?q=id_1871.htm

Wenn das virtuelle Destroy (override) richtig aufräumt sollte es doch OK sein.

Rollo