[fpc-devel] [PATCH] patch for zipper.pp
micha at neli.hopto.org
Wed Jul 29 09:40:45 CEST 2009
Andrew Haines wrote:
> procedure TForm1. at UnZipCustomOutput(Sender: TObject; var AStream:
> TStream; AItem: TFullZipFileEntry; AClosing: Boolean);
> if AClosing = False then
> AStream := TMemoryStream.Create;
Do you mind if I say I think this is a very weird event handler?
What is the behaviour? How many times is it called? What does AClosing
mean? How do I know I don't have a memory leak?
Why an event handler and not a property? A CustomStream property where
non-nil means use this stream, if nil then default old behaviour e.g.
More information about the fpc-devel