| zLib.SLL | zLib interface
support library. |
| zLib.DLL | Support DLL |
| zLib.st
zLib.pol zLib.prj Current.Project |
Source files |
| ARBase.sll | Alejandro Reimondo base components SLL |
| ARAddins.sll | SelfDefinedStructures support |
#('ARBase' 'ARAddIns' 'zlib')
do:[:lib|SmalltalkLibraryBinder
bindTo:lib].
"Open the zip file 312wd1.zip in the current directory and display
some statistics"
lib := ZLibLibrary openRead:'312wd1.zip'.
"Evaluate with show it"
lib fileNames.
"List the file names in the archive"
lib numberOfEntries. "List the number of file names
in the archive"
contents := lib contentsOf: 'upgrade/partug.txt'. "Access the contents
of the file named"
lib close.
"Create a zip file if it doesn't exist and add a new file to the
archive"
lib := ZLibLibrary openWrite:'testZip.zip'.
lib createFile:'test.txt'.
lib write:'Test for zLib interface'.
lib closeFile. "test.txt"
lib close. "textZip.zip"
Links to:
The
ObjectShare web site
VisualSmalltalk
Product Support
ObjectShare's
Online Documentation Site