uZipIsOpen ( )

Checks to see if Rosetta still holds exclusive access to the opened zip archive.

Usage:

uZipIsOpen (object me)

Parameters:

None

Returns:

(integer) - the success code

Example:

-- ask end user for a zip file, then extract all file contents on to the same folder
xtRose = xtra("Rosetta").new( )

strPath = xtRose.dlgFile( 2, the moviepath, "untitled.zip", "Zip file (*.zip)|*.zip", "zip" )
If ( STRINGP(strPath) = TRUE ) Then
  If ( xtRose.uZipOpen(strPath) > 0 ) Then
    repeat with i = 1 to xtRose.uZipCount( )
      strFileName = xtRose.uZipGetItemName( i )
      xtRose.uZipItem( i, the moviepath & strFileName )
    End Repeat
  End If
End If
If ( xtRose.uZipIsOpen( ) = TRUE ) Then
  xtRose.uZipClose( )
End If

Notes: