Mein Programm ist Arbeitsspeicher hungrig..

[hoika]

Hallo,
ich würde noch packend Record schreiben.

Für Speicherlecks werfe ich noch FastMM4 rein..


Heiko

[himitsu]

Packed wird hier nichts ändern und bei aktiv genutzten Records im Speicher ist wowas es etwas ungünstiger.

Vorner der 4 Byte Pointer und dahinter eine gute Anzahl an Bytes, womit am Ende alles praktisch schon gepackt ist, da keine Leerstellen entstehen
und es sind sogar so viele Bytes (Boolean), daß der Record voll ist. (vielfaches von 4)

Und dann ist das Array mit den Records eh nichtmal 2 MB groß.
Wie hier welche entdeckt haben, liegt das Problem ja ganz wo anders. (Speicherlecks)

[Mavarik]

Zitat von himitsu:

Packed wird hier nichts ändern und bei aktiv genutzten Records im Speicher ist wowas es etwas ungünstiger.

Vorner der 4 Byte Pointer und dahinter eine gute Anzahl an Bytes, womit am Ende alles praktisch schon gepackt ist, da keine Leerstellen entstehen
und es sind sogar so viele Bytes (Boolean), daß der Record voll ist. (vielfaches von 4)

Und dann ist das Array mit den Records eh nichtmal 2 MB groß.
Wie hier welche entdeckt haben, liegt das Problem ja ganz wo anders. (Speicherlecks)

Nööö jedes Byte wird aligned daher
{$A1}

Und NATÜRLICH keinen Logstring nehmen.... Wie oft steht da der gleiche String drin?

[himitsu]

Bytes sind nie Aligned, bzw. immer an 1 ausgerichtet, egal ob mit oder ohne Packed.

{$ALIGN} gibt nur die maximale Ausrichtung an und kleineren Typen werden immer an ihrer eigenen Größe ausgerichtet.

Zitat:

Wire oft steht da der gleiche String drin?

Ist egal, solange die Strings nicht aus der selben Quelle kommen (Kopie des selben Strings), belegt jeder leider seinen eigenen Speicher.
Die Strings werden alle "neu" erzeugt (teilweise aus einem Anderen rauskopiert) und sind demnach immer unique. (gibt standardmäßig "leider" keinen Algo, der das zusammenfasst)

[Mavarik]

Zitat von himitsu:

Die Strings werden alle "neu" erzeugt (teilweise aus einem Anderen rauskopiert) und sind demnach immer unique. (gibt standardmäßig "leider" keinen Algo, der das zusammenfasst)

Und? Chars in einer großen Liste speichern und nur den Pointer auf den Start... Test ob Kombination schon existent und gleichen pointer zurück geben...

[Mavarik]

Zitat von himitsu:

Bytes sind nie Aligned, bzw. immer an 1 ausgerichtet, egal ob mit oder ohne Packed.

Schon aber

Delphi-Quellcode:

type
  A = packed Record // Sizeof = 5
        S : String;
        B1 : byte;
      End;
  B =  Record       // Sizeof = 8
        S : String; 
        B1 : byte;
      End;

[himitsu]

Ja, aber in seinem Record gibt es "zufällig" genau ein Vielfaches von 4, an Bytes/Booleans.

Und wie gesagt, die Liste mit allen Records selber ist grade mal 0,7 MB groß winzig.
Wobei die gesamten 100 MB nun eigentlich auch nicht wirklich soooooo viel sind.


PS: In XE8 hat man ja grade noch den "Spaß", daß generische Listen mit SizeOf(T) > 4 kaputt sind.

[Mavarik]

Zitat von himitsu:

PS: In XE8 hat man ja grade noch den "Spaß", daß generische Listen mit SizeOf(T) > 4 kaputt sind.

emm wie? Unter welchen Bedingungen?