クリーンアップコードは、リソースの保護などに使われます。
クリーンアップコードの書式は、
try
//実行文;
finally
//クリーンアップ部;
end;
クリーンアップ部は例外処理のときとは違い、例外が発生しなくても、実行されます。
使用例
別フォームを表示させるサンプル(SubFormというフォームを作っておいて下さい)
procedure TForm1.Button1Click(Sender: TObject);
begin
try
SubForm.ShowModal;
finally
SubForm.Release;
end;
end;