iOS Question ZipDone Event

[narek adonts]

Hi,

I am unable to fire ZipDone event of Archiver

compress.AsyncZipFolder(File.DirTemp & "/1",File.DirTemp,"1zip.zip","zip")

Sub zip_ZipDone
Log("done")
End Sub

But the file is creating. I can check it with File.Exists

 

[JanPRO]

Just a little mistake:

Sub zip_ZipDone (Success As Boolean)

If Success Then
    Log("done")
Else
    Log("fail")
End If

End Sub