Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.119 Beiträge
 
Delphi 11 Alexandria
 
#8
  Alt 15. Nov 2002, 19:24
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.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat