summaryrefslogtreecommitdiff
path: root/examples/gui/listviewtest
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-13 10:45:08 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-13 10:45:08 +0000
commit60515a6cef02edd0ccab823569f10238c26f10c7 (patch)
tree7d913e6ed3f587509dcaa2cd81a88fb63982d125 /examples/gui/listviewtest
parent97c0f8c9a629842f647e19dc792c055895763f98 (diff)
downloadfpGUI-60515a6cef02edd0ccab823569f10238c26f10c7.tar.xz
* CoreLib: fpgApplication now has a Terminated property which terminates the
main event loop and application. Halt was just to harsh and objects never got freed. * GUI: Added a new INI Utils unit which introduces ReadOnly ini support and can also save a form's state and position. You access the ini file via the gINI singleton function. fpGUI Designer uses this. * All example project now free there main forms correctly. * Many bug fixes in GUI Designer. GUI Designer now also remembers the size and location of most forms. * Many of the GUI Designer forms are now maintained by the GUI Designer itself. * GUI Designer: Started implementing a Recent Files feature so it is quicker to open frequently used files.
Diffstat (limited to 'examples/gui/listviewtest')
-rw-r--r--examples/gui/listviewtest/listviewtest.lpi4
-rw-r--r--examples/gui/listviewtest/listviewtest.lpr11
2 files changed, 4 insertions, 11 deletions
diff --git a/examples/gui/listviewtest/listviewtest.lpi b/examples/gui/listviewtest/listviewtest.lpi
index 8e8f6e62..d6e7b16f 100644
--- a/examples/gui/listviewtest/listviewtest.lpi
+++ b/examples/gui/listviewtest/listviewtest.lpi
@@ -25,10 +25,10 @@
</RunParams>
<RequiredPackages Count="2">
<Item1>
- <PackageName Value="fpgui_package"/>
+ <PackageName Value="fpgfx_package"/>
</Item1>
<Item2>
- <PackageName Value="fpgfx_package"/>
+ <PackageName Value="fpgui_package"/>
</Item2>
</RequiredPackages>
<Units Count="1">
diff --git a/examples/gui/listviewtest/listviewtest.lpr b/examples/gui/listviewtest/listviewtest.lpr
index 8e61d78f..d4eb30fc 100644
--- a/examples/gui/listviewtest/listviewtest.lpr
+++ b/examples/gui/listviewtest/listviewtest.lpr
@@ -26,11 +26,8 @@ type
ItemIndex: Integer; Area:TfpgRect; var PaintPart: TfpgLVItemPaintPart);
procedure ItemSelectionChanged(ListView: TfpgListView; Item: TfpgLVItem;
ItemIndex: Integer; Selected: Boolean);
-
-
public
constructor Create(AOwner: TComponent); override;
- destructor Destroy; override;
end;
{ TMainForm }
@@ -188,14 +185,10 @@ begin
end;
-destructor TMainForm.Destroy;
-begin
- inherited Destroy;
-end;
-
begin
fpgApplication.Initialize;
- with TMainForm.Create(nil) do begin
+ with TMainForm.Create(nil) do
+ begin
Show;
fpgApplication.Run;
Free;