Freigeben von Records

[TheMiller]

Hey.

habe gerade beim Durchtesten gemerkt, dass mein Programm zunehmend Arbeitsspeicher frisst, je länger ich es benutze. Arbeite mittlerweile viel mit versch. Records. Jetzt schließe ich immer die offenen Record-Dateien, wenn ich eine Form verlasse und öffne sie wieder, wenn ich sie brauche. Muss ich nicht aber doch den Speicher noch freigeben? Dachte so:

Delphi-Quellcode:

datei.free;

Das mag der Compiler aber nicht:

Delphi-Quellcode:

Objekt, Klassentyp oder Record erforderlich

gebe ich

Delphi-Quellcode:

data.free

ein, funzt es auch nicht.

Ist diese Methode überhaupt notwendig, oder gebe ich den Speicher schon frei, indem ich die Datei schließe?

[Luckie]

Records kan man nicht frei geben. Entweder hält man sie im Speicher (dynamisches Array zum beispiel) oder nicht.

[Binärbaum]

Um deine Frage beantworten zu können, wäre es hilfreich, wenn du uns verrätst, von welchem Typ datei bzw. data sind.

MfG
Binärbaum

[TheMiller]

Also kann ich einfach mit CloseFile die Datei bedenkenlos schließen, ohne dass "Überreste" im Speicher bleiben?

Delphi-Quellcode:

Klar: datei: file of TRecord
data: TRecord

[Luckie]

CloseFile löscht nur die Verknüpfung zur Datei, die mit [oh]AssignFile[oh] angelegt wurde. Du solltest diesbezüglich mal etwas in der Hilfe lesen. Wenn du vorher alle Records in ein dynamisches Array geladen hast, wird das nichts am Speicherverbrauch ändern.

Jetzt erklär uns doch mal näher, was du da machst, sonst ist das hier nur ein Rumgerate ins blaue. :roll:

[TheMiller]

Ok,

ich habe im FormActive die Prozedure "Assign". Dann lese oder schreibe ich die Daten mit seek, read und write. Wenn ich dann dieses Formular verlasse, habe ich die Prozedur "CloseFile". Ein Array benutze ich garnicht...

[Luckie]

Dann dürftest du auch nichts mehr im Speicher haben, wenn dein Record, in dem du die Daten einlist, lokal ist.

[TheMiller]

OK,

dann sage ich mal wieder "danke"

[Binärbaum]

Die Methode .Free wird z.B. bei TFileStream benötigt, um den Speicher freizugeben.
Bei typisierten Dateien, wie du sie verwendest, gibt es keine Methode Free.
Deswegen vermute ich, dass das Speicherleck irgendwo anders in deinem Programm liegt.

MfG
Binärbaum

[Luckie]

Zitat:

Zitat von Binärbaum

Die Methode .Free wird z.B. bei TFileStream benötigt, um den Speicher freizugeben.

Aber nur den Speicher für das TFileStream-Objekt! Desweiteren wird noch die Datei geschlossen.