diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-12-04 14:41:19 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-12-04 14:41:19 +0000 |
| commit | f03b596e2a10ca310aa9f0d581ffb6bf8bc4753f (patch) | |
| tree | 5c0cb0aff215cf0922925253b15bc2706465cc66 /examples/gui/treeviewtest | |
| parent | acbf9e099e49650f880c37cb97d3f8f532e2bdf1 (diff) | |
| download | fpGUI-f03b596e2a10ca310aa9f0d581ffb6bf8bc4753f.tar.xz | |
* Fixed a memory leak in TfpgCombobox.
* Fixed a couple of memory leaks in gui_tree.pas
Diffstat (limited to 'examples/gui/treeviewtest')
| -rw-r--r-- | examples/gui/treeviewtest/treeviewtest.lpr | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/examples/gui/treeviewtest/treeviewtest.lpr b/examples/gui/treeviewtest/treeviewtest.lpr index 562ca8bb..68fb9f91 100644 --- a/examples/gui/treeviewtest/treeviewtest.lpr +++ b/examples/gui/treeviewtest/treeviewtest.lpr @@ -75,9 +75,12 @@ var begin fpgApplication.Initialize; frm := TMainForm.Create(nil); - frm.Show; - fpgApplication.Run; - frm.Free; + try + frm.Show; + fpgApplication.Run; + finally + frm.Free; + end; end; begin |