Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
DynaZip and VFP
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00592423
Message ID:
00593029
Views:
28
Actually, I opend the dzactx.dll that comes with DynaZip in the
VFP Object Browser, and the events I want to trap are there.

I various ways, I tried:


LOCAL oDynaZip, oHandler, lBound

oDynaZip = CREATEOBJECT("dzactx.dzactxctrl")
oHandler = CREATEOBJECT("DzHandler")

lBound = EVENTHANDLER(oDynaZip, oHandler)

DEFINE CLASS DzHandler AS Custom

IMPLEMENTS _dzactxEvents IN dzactx.dzactxctrl

PROCEDURE ZipMajorStatus(ItemName As String, Percent As Numeric, Cancel As Numeric) As None
ENDPROC

PROCEDURE ZipMemToMemCallback(lAction As Numeric, lpMemBuf As String, pdwSize As Numeric, dwTotalReadL As Numeric, dwTotalReadH As Numeric, dwTotalWrittenL As Numeric, dwTotalWrittenH As Numeric, plRet As Numeric) As None
ENDPROC

PROCEDURE ZipMessageCallback(MsgID As Numeric, mbType As Numeric, p1 As Numeric, p2 As Numeric, sz1 As String, sz2 As String, rc As Numeric) As None
ENDPROC

PROCEDURE ZipMinorStatus(ItemName As String, Percent As Numeric, Cancel As Numeric) As None
ENDPROC

PROCEDURE ZipRenameCallback(ItemName As String, iDate As Numeric, iTime As Numeric, lAttrib As Numeric, OrigItemName As String, rc As Numeric) As None
ENDPROC

ENDDEFINE


but I could'nt get it work. Any thoughts?

Kevin
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform