diff options
Diffstat (limited to 'examples/apps/uidesigner/vfdwidgets.pas')
-rw-r--r-- | examples/apps/uidesigner/vfdwidgets.pas | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/examples/apps/uidesigner/vfdwidgets.pas b/examples/apps/uidesigner/vfdwidgets.pas index fb41337f..099cf4c5 100644 --- a/examples/apps/uidesigner/vfdwidgets.pas +++ b/examples/apps/uidesigner/vfdwidgets.pas @@ -24,6 +24,7 @@ interface uses SysUtils, Classes, + contnrs, vfdwidgetclass, vfdprops, typinfo; @@ -65,7 +66,7 @@ uses var FVFDFormWidget: TVFDWidgetClass; - FVFDWidgets: TList; + FVFDWidgets: TObjectList; function VFDFormWidget: TVFDWidgetClass; begin @@ -442,10 +443,11 @@ end; initialization - FVFDWidgets := TList.Create; + FVFDWidgets := TObjectList.Create; finalization FVFDWidgets.Free; + FVFDFormWidget.Free; end. |