summaryrefslogtreecommitdiff
path: root/extras
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-13 11:11:09 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-13 11:11:09 +0000
commit3d756b7a23979e6d13f3fffefe18fcaaf6edf7b6 (patch)
tree2a6f32c9343079ca1b844687de4bc9406401e0d8 /extras
parent60515a6cef02edd0ccab823569f10238c26f10c7 (diff)
downloadfpGUI-3d756b7a23979e6d13f3fffefe18fcaaf6edf7b6.tar.xz
* change log added
Diffstat (limited to 'extras')
-rw-r--r--extras/code_templates/lazarus.dci8
1 files changed, 6 insertions, 2 deletions
diff --git a/extras/code_templates/lazarus.dci b/extras/code_templates/lazarus.dci
index 888b0b1e..1d45da00 100644
--- a/extras/code_templates/lazarus.dci
+++ b/extras/code_templates/lazarus.dci
@@ -28,8 +28,12 @@ var
begin
fpgApplication.Initialize;
frm := TMainForm.Create(nil);
- frm.Show;
- fpgApplication.Run;
+ try
+ frm.Show;
+ fpgApplication.Run;
+ finally
+ frm.Free;
+ end;
end;
begin