Changeset 41 for trunk/USystem.pas

Timestamp:

Mar 9, 2012, 9:40:05 AM (13 years ago)

Author:

chronos

Message:

• Fixed: Memory leak in TReportColumn.
• Modified: Main item list is created once on application start instead on every tree item mouse doubleclick.

File:

• trunk/USystem.pas (modified) (3 diffs)

trunk/USystem.pas

@@ -47 +47 @@
   end;
 
+  { TReportColumn }
+
   TReportColumn = class
     Caption: string;
@@ -54 +56 @@
     VirtualItem: Boolean;
     Control: TWinControl;
+    destructor Destroy; override;
   end;
 
@@ -153 +156 @@
   SUnsupportedType = 'Unsupported property type "%s"';
 
+{ TReportColumn }
+
+destructor TReportColumn.Destroy;
+begin
+  CustomType.Free;
+  inherited Destroy;
+end;
+
 { TChronisTypeList }