Speicherverbrauch stark gewachsen

[Ralf22]

Beide Compilate (XE2, XE10.2) verwenden Unicode strings.

[Zacherl]

Kannst ja mal die Größen der packed record s vergleichen. Vielleicht haben sich hier die beinhaltenden Datentypen verändert. Was mir auch in den Sinn kam: Wenn du Konstrukte der Form var A: array[TIrgendeinEnum] of TIrgendwasGrosses hast und das Enum einige neue Elemente bekommen hat, könnte das auch zu mehr Verbrauch führen. Kann man leider nur spekulieren.

[Der schöne Günther]

Könnte man nicht mit FastMM sich die Anzahl der Speicher-Reservierungen und was die jeweils an Speicher fressen ansehen? Damit könnte man doch eigentlich die notwendigen Rückschlüsse ziehen, ob es das ClientDataSet, die Record-Liste oder was anderes ist.

Lesestoff:
1. http://www.thedelphigeek.com/2012/06...-purposes.html
2. https://stackoverflow.com/questions/14390934/
3. https://github.com/pleriche/FastMM4/...sage%20Tracker

[Ralf22]

Das Problem ist gelöst, peinlicherweise kein Delphi-Problem, das Programm benutzt einige C-Treiber. Einer der C-Treiber verursacht den hohen Speicherverbrauch. Das XE10 Programm benutzt jetzt nur noch ca. 3% mehr RAM-Speicher als die XE2 Exe.
Danke an alle.

[Benedikt Magnus]

Wenn man fragen darf, wie hast du das ermitteln können und wie hat der C-Treiber plötzlich beim Umstieg den Speicherverbrauch so ansteigen lassen?

[Ralf22]

Mit dem Debugger, nach dem Aufruf einer Funktion in der Treiber DLL ist der Speicherverbrauch stark angestiegen. Da war ein Überlauf bei der Berechnung der Größe für einen Pufferspeicher.
Wir hatten schon öfters nicht initialisierte Stack Variablen die über Jahre immer zufälliger Weise mit Werten versehen waren, die keine Probleme machten. Bei einer neuen Delphiversion fällt das dann plötzlich auf und man findet einen uralten Bug.
z.B. gibt Delphi keine Warnung aus, wenn eine Variable von einen Mengentypen nicht initialisiert wird. Zumindest war das an der Stelle so, ich weiss nicht ob das generell so ist.

[Der schöne Günther]

Pff, Delphi zeigt noch nicht einmal eine Warnung an wenn du einen Integer in ein Byte stecken willst oder einen nicht initialisierten Record verwendest. Delphi sieht das alles etwas lockerer, man muss ja nicht alles so ernst nehmen

Delphi-Quellcode:

type
   TMyRecord = record
      value: Integer;
   end;

procedure p();
var
   myRecord: TMyRecord;
   myInteger: Integer;
begin
   WriteLn(myRecord.value); // << Keine Warnung
   WriteLn(myInteger);
end;