[VB.NET]
Event OnCompressionTarToGZipStart As TSBTarCompressionTarToGZipStartEvent
Delegate Sub TSBTarCompressionTarToGZipStartEvent(ByVal Sender As Object, ByRef Compress As Boolean)
[Pascal]
property OnCompressionTarToGZipStart : TSBTarCompressionTarToGZipStartEvent;
TSBTarCompressionTarToGZipStartEvent = procedure(Sender: TObject; var Compress : boolean) of object;