Added zip file functionality
Posted by mholmes on 19 Dec 2006 in Activity log
It's long been part of the plan for IMT to include the ability to create a zip archive which includes the XML markup file, the image, and the schemas and odd files associated with the project. This is now working:
- Installed ZipForge into Delphi 2005. This took a few tries; in the end I had to get the latest version, run the installer, then manually install the packages in D2005 using the BPL files which end up being built in zipforge/Lib/Delphi 2005.
- Created a hidden form to house the component, including a zip file save dialog and a couple of umsg labels for user messages.
- Created a progress dialog box with two progress bars to show the file progress and the overall progress.
- Created a function in the hidden form which accepts a zip file name and a TWideStringList containing file masks to add to the zip file.
- Created event handlers to update the progress window (this is largely based on the ZipForge basic demo for Delphi).
- In the main application form, created an action aCreateZipPackage, along with an associated menu item on the File menu.
- Built the function which saves a temp version of the file, populates the TWideStringList, and calls the zip file building function.
- Tested and tweaked.
The next stage is documentation.