Changeset 60 for branches/Transpascal/UProject.pas
- Timestamp:
- Oct 14, 2010, 1:50:39 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/Transpascal/UProject.pas
r55 r60 24 24 TProjectFile = class(TProjectNode) 25 25 Source: TStringList; 26 ProducedCode: TStringList;27 26 constructor Create; 28 27 destructor Destroy; override; … … 104 103 begin 105 104 Source := TStringList.Create; 106 ProducedCode := TStringList.Create;107 105 end; 108 106 … … 110 108 begin 111 109 Source.Free; 112 ProducedCode.Free;113 110 inherited Destroy; 114 111 end;
Note:
See TracChangeset
for help on using the changeset viewer.