Problem beim Beenden von Programm

[Christian Seehase]

Moin Chris,

im Einzelschritt durch das Programm gehen geht mit F7/F8, wobei bei F7 dann auch in Unterroutinen verzweigt wird, während diese bei F8 nur ausgeführt werden.

Für den Resourcenschutz ist der sogenannte Resourcenschutzblock try/finally zuständig.
Hierdurch wird zusätzlicher Code mit in das Programm aufgenommen, der gewährleisten soll, das belegte Resourcen (in erster Linie Handle und Speicher) auch tatsächlich wieder freigegeben werden.

Bei Deinem Codefragement sähe dass dann so aus:

Code:

[b]procedure[/b] TForm1.FormClose(Sender: TObject; [b]var[/b] Action: TCloseAction); 
[b]begin[/b] 
  MainIniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'preferences.ini'); 
  [b]try[/b]
    MainIniFile.WriteString('main', 'highlighter', getHighlighter); 
  [b]finally[/b]
    MainIniFile.Free; 
  [b]end[/b];
[b]end[/b];

Erst wird das Objekt erzeugt, dann, zwischen try und finally damit gearbeitet, und anschliessend wird der finally Block abgearbeitet, und das unabhängig davon, ob im try Block alles glatt gegangen ist oder nicht. Es könnte ja z.B. sein, dass WriteString fehlschlägt, weil die Platte voll ist.

Zwei weitere Resourcenschutzblöcke wären Form.OnCreate/Form.OnDestroy, sowie die initialization/finalization Abschnitte einer Unit.

Vor dem Abschuss des Programmes aus dem Taskmanager heraus, oder durch einen TerminateProcess von aussen helfen diese natürlich nicht.