[C#]
    event TSBZipCompressionStartEvent OnCompressionStart;
    delegate void TSBZipCompressionStartEvent(Object Sender, TElZipArchiveDirectoryEntry Entry, ref bool Compress);

[VB.NET]
    Event OnCompressionStart As TSBZipCompressionStartEvent
    Delegate Sub TSBZipCompressionStartEvent(ByVal Sender As Object, ByVal Entry As TElZipArchiveDirectoryEntry, ByRef Compress As Boolean)

[Pascal]
    property OnCompressionStart : TSBZipCompressionStartEvent;
    TSBZipCompressionStartEvent = procedure(Sender: TObject; Entry : TElZipArchiveDirectoryEntry; var Compress : boolean) of object;

[C++]
    void get_OnCompressionStart(TSBZipCompressionStartEvent &pMethodOutResult, void * &pDataOutResult);
    void set_OnCompressionStart(TSBZipCompressionStartEvent pMethodValue, void * pDataValue);
    typedef void (SB_CALLBACK *TSBZipCompressionStartEvent)(void * _ObjectData, TObjectHandle Sender, TElZipArchiveDirectoryEntryHandle Entry, int8_t &Compress);

[PHP]
    TSBZipCompressionStartEvent|callable|NULL get_OnCompressionStart()
    void set_OnCompressionStart(TSBZipCompressionStartEvent|callable|NULL $Value)
    callable TSBZipCompressionStartEvent(TObject $Sender, TElZipArchiveDirectoryEntry $Entry, bool &$Compress)

[Java]
    TSBZipCompressionStartEvent getOnCompressionStart();
    void setOnCompressionStart(TSBZipCompressionStartEvent Value);
    TSBZipCompressionStartEvent.Callback OnCompressionStart = new TSBZipCompressionStartEvent.Callback() {
        public void TSBZipCompressionStartEventCallback(TObject Sender, TElZipArchiveDirectoryEntry Entry, TSBBoolean Compress) {
            //...
        }
    }