<div>
I've never used ZipX so I don't know anything about the command line parameters you are using to open the archive file, however, if you don't mind using components rather than relying on another application there are a large amount of freeware objects you can use that will give you better control over the archive.<br />
<br />
A good one I have used in the past is TurboPowers Abbrevia component set, this can be downloaded from SourceForge (as it's now open source) at: &nbsp;<a href="http://sourceforge.net/projects/tpabbrevia/" rel="ugc">http://sourceforge.net/projects/tpabbrevia/</a><br />
<br />
Cheers.<br />
:-)<br />
<br />

</div>


I've never used ZipX so I don't know anything about the command line parameters you are using to open the archive file, however, if you don't mind using components rather than relying on another application there are a large amount of freeware objects you can use that will give you better control over the archive.

A good one I have used in the past is TurboPowers Abbrevia component set, this can be downloaded from SourceForge (as it's now open source) at:  http://sourceforge.net/projects/tpabbrevia/ [http://sourceforge.net/projects/tpabbrevia/]

Cheers.
:-)



<div>
That works perfect. &nbsp;Thanks!
</div>


<div>
<div class="content wysiwyg-content">
Is there an easy way to unzip a file. &nbsp;Here is my code. &nbsp;It downloads the file fine but is not extracting it. &nbsp;Am I doing this right or is there an easier way??<br />
<br />
<a href="ftp://FTP.Get('officesOFFICES.zip'" rel="ugc">FTP.Get('officesOFFICES.zip'</a>, 'C:\CSS\RETS\CharlestonOff<wbr />ice.zip', true, true);<br />
ZipFile := 'C:\CSS\RETS\CharlestonOff<wbr />ice.zip';<br />
cmd:='/c c:\discod\discoc\sys\zipx '+ZipFile;<br />
ShellExecute(Application.h<wbr />andle,'ope<wbr />n','comman<wbr />d',PChar(c<wbr />md),nil,SW<wbr />_SHOW);<br />
<br />

</div>
</div>


Is there an easy way to unzip a file.  Here is my code.  It downloads the file fine but is not extracting it.  Am I doing this right or is there an easier way??

FTP.Get('officesOFFICES.zip', 'C:\CSS\RETS\CharlestonOffice.zip', true, true);
ZipFile := 'C:\CSS\RETS\CharlestonOffice.zip';
cmd:='/c c:\discod\discoc\sys\zipx '+ZipFile;
ShellExecute(Application.handle,'open','command',PChar(cmd),nil,SW_SHOW);



Unzip a zip file

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.