Changeset 41 for branches/DelphiToC/UPascalSource.pas

Timestamp:

Aug 5, 2010, 1:17:35 PM (14 years ago)

Author:

george

Message:

Added separate unit for filling treeview with program source.

File:

• branches/DelphiToC/UPascalSource.pas (modified) (1 diff)

branches/DelphiToC/UPascalSource.pas

@@ -439 +439 @@
 
 destructor TFunctionList.Destroy;
-var
-  I: Integer;
-begin
-  for I := 0 to Count - 1 do
-    TFunction(Items[I]).Free;
+begin
   inherited;
 end;