Einzelnen Beitrag anzeigen

Benedikt Magnus

Registriert seit: 6. Jul 2012
Ort: Bonn
190 Beiträge
 
FreePascal / Lazarus
 
#9

AW: TIniFile umbiegen zu TIniMemFile

  Alt 6. Nov 2016, 21:44
Ganz einfach

Deine klasse kann man nicht benutzen wie jede andere

normalerweise erwartet man nicht das eine Procedure die Klasse freigibt.

immer
1.create
2.arbeiten
3.freigeben

Delphi-Quellcode:
T := TIrgendwas.Create;
try
  t.tuewas;
t.UpdateFileAndFree; // Du gibts die klasse frei
t.tuewasanders; // Knallt


finally
 t.free;
end;
Wenn Du das verhalten änderst ist das einfach falsch.
Wenn schon überschreibe den destructor.
Versuche es doch mal so:
Delphi-Quellcode:
T := TIrgendwas.create;
try
  T.TueEtwas;
  T.UpdateFile;
  T.TueEtwasAnderes;
finally
  T.UpdateFileAndFree;
end;
  Mit Zitat antworten Zitat