Einzelnen Beitrag anzeigen

Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#18

AW: Arbeitsspeicher läuft über - wie leeren

  Alt 19. Aug 2010, 13:26
Hallo alfold,

danke für die Antwort. Ich habe die Passage ausgeklammert, weil ich keinerlei Veränderung dadurch gemerkt habe, ich Euch ab zeigen wollte, was ich schon ausprobiert habe...

Zitat:
Für die effiziente Nutzung solltest Du vielleicht vorher noch Prüfen ob es sinn macht die Arrays neu zusetzen und wenn ja dann die Länge auf 0 setzen, wie oben gezeigt und dann erst die neue Länge festlegen!
Hast Du einen Vorschlag für mich, wie ich das ändern kann. In der Procedure wird nämlich das Array of Array of string um eine Zeile vergrößert, in die dann geschrieben wird. Wenn ich die Länge vorher wieder auf '0' setze, dann sind die vorherigen Einträge ja alle wieder weg.

Warum habe ich den Speicher mit der nachstehenden Anweisung nicht wieder freibekommen?
Delphi-Quellcode:
SetLength(Rows1,0,0); SetLength(Cols1,0);
  SetLength(Rows2,0,0); SetLength(Cols2,0);
  SetLength(Rows3,0,0); SetLength(Cols3,0);
  SetLength(Rows4,0,0); SetLength(Cols4,0);
  SetLength(Rows5,0,0); SetLength(Cols5,0);
  SetLength(Rows6,0,0); SetLength(Cols6,0);
  SetLength(Rows7,0,0); SetLength(Cols7,0);
  SetLength(Rows8,0,0); SetLength(Cols8,0);
  SetLength(Rows41,0,0); SetLength(Cols41,0);
  SetLength(RowsKZ,0,0); SetLength(ColsKZ,0);
  SetLength(RowsFinal,0,0); SetLength(ColsFinal,0);
Gruß
Patrick
Patrick
  Mit Zitat antworten Zitat