Platforms to show: All Mac Windows Linux Cross-Platform
/Compression/Old ZipMBS class/zip append
Required plugins for this example: MBS Compression Plugin
You find this example project in your Plugins Download as a Xojo project file within the examples folder: /Compression/Old ZipMBS class/zip append
This example is the version from Sun, 17th Mar 2012.
Project "zip append.xojo_binary_project"
MenuBar MenuBar1
MenuItem UntitledMenu1 = ""
MenuItem FileMenu = "&File"
MenuItem FileQuit = "Quit"
MenuItem EditMenu = "&Edit"
MenuItem EditUndo = "&Undo"
MenuItem UntitledMenu0 = "-"
MenuItem EditCut = "Cu&t"
MenuItem EditCopy = "&Copy"
MenuItem EditPaste = "&Paste"
MenuItem EditClear = "Clear"
End MenuBar
Class App Inherits Application
EventHandler Sub Open()
// Run this app several times.
// First time it creates zip archive
// Second time it adds files
dim z as ZipMBS
dim f as FolderItem
dim d as date
dim info as ZipFileInfoMBS
f=SpecialFolder.Desktop.Child("test.zip")
dim mode as integer = ZipMBS.AppendStatusCreate
if f.Exists then
mode = ZipMBS.AppendStatusAddInZip
end if
z=new ZipMBS(f,mode)
info=new ZipFileInfoMBS
info.SetDate new date
info.ExternalFileAttributes=0
info.InternalFileAttributes=0
info.DosDate=0
dim r as new random
dim filename as string = "test "+str(r.InRange(1, 1000))
z.CreateFile filename, info, "", "", "", z.MethodDeflated, z.CompressionBestCompression
z.Write "Hello World in "+filename
z.CloseFile
z.Close
quit
End EventHandler
End Class
FileTypes
Filetype text
End FileTypes
End Project
See also:
- /Compression/Old ZipMBS class/ExtractFiles test
- /Compression/Old ZipMBS class/unzip with encryption
- /Compression/Old ZipMBS class/unzip with folders and encryption
- /Compression/Old ZipMBS class/unzip with folders and progressbar
- /Compression/Old ZipMBS class/unzip with memory
- /Compression/Old ZipMBS class/unzip with string
- /Compression/Old ZipMBS class/zip
- /Compression/Old ZipMBS class/zip images
- /Compression/Old ZipMBS class/zip with encryption
- /Compression/Old ZipMBS class/zip without compression
The items on this page are in the following plugins: MBS Compression Plugin.