Skip to content

Commit 97c3c7d

Browse files
committed
memory leak fixed
1 parent 925c8c1 commit 97c3c7d

File tree

1 file changed

+5
-2
lines changed

1 file changed

+5
-2
lines changed

Diff for: intf.ZUGFeRDInvoiceDescriptor22Writer.pas

+5-2
Original file line numberDiff line numberDiff line change
@@ -107,8 +107,11 @@ procedure TZUGFeRDInvoiceDescriptor22Writer.Save(
107107
_writer := TZUGFeRDInvoiceDescriptor22UBLWriter.Create
108108
else
109109
_writer := TZUGFeRDInvoiceDescriptor22CIIWriter.Create;
110-
111-
_writer.Save(_descriptor, _stream, _format);
110+
try
111+
_writer.Save(_descriptor, _stream, _format);
112+
finally
113+
_writer.Free;
114+
end;
112115
end;
113116

114117
function TZUGFeRDInvoiceDescriptor22Writer.Validate(

0 commit comments

Comments
 (0)