[VB.NET]
Event OnExtractionStart As TSBTarExtractionStartEvent
Delegate Sub TSBTarExtractionStartEvent(ByVal Sender As Object, ByVal Entry As TElTarArchiveDirectoryEntry, ByRef Extract As Boolean)
[Pascal]
property OnExtractionStart : TSBTarExtractionStartEvent;
TSBTarExtractionStartEvent = procedure(Sender: TObject; Entry : TElTarArchiveDirectoryEntry; var Extract : boolean) of object;