Lianja

Transition from Zip.GetEntryByIndex to Zip.EntryAt

Provides instructions for replacing deprecated GetEntryByIndex method calls with EntryAt. Lianja

llSuccess = .F.

loZip = createobject("CkZip")

// ...
// ...
lnIndex = 15

// ------------------------------------------------------------------------
// The GetEntryByIndex method is deprecated:

loEntryObj = loZip.GetEntryByIndex(lnIndex)
if (loZip.LastMethodSuccess = .F.) then
    ? loZip.LastErrorText
    release loZip
    return
endif

// ...
// ...

release loEntryObj

// ------------------------------------------------------------------------
// Do the equivalent using EntryAt.
// Your application creates a new, empty ZipEntry object which is passed 
// in the last argument and filled upon success.

loZe = createobject("CkZipEntry")
llSuccess = loZip.EntryAt(lnIndex,loZe)
if (llSuccess = .F.) then
    ? loZip.LastErrorText
    release loZip
    release loZe
    return
endif



release loZip
release loZe