如何操作压缩文件???

Question

delphi如何操作压缩文件?
如:
我有一个a.rar文件, 要它解压到c:\a
请教该怎么样做??

Answer 1

调用winrar 看下rar帮助的控制台命令.
还有 WinExec 的使用

Answer 2

搜索下看有没有可以操作RAR文件的控件.

Answer 3

网上有DLL可以用,直接调用里面的函数就可以了!

Answer 4

好帖
============================================================
一次，我喝多了，去洗手间转头突然发现一个GG正背对着我嘘嘘…
…　　对视了3秒钟，他受到惊吓，我也吓得冲出来了！　　跑到外
面一看，门上是个男生的标志，内心有愧，于是我又冲进去对那男生
喊了声“对不起”。　　结果可怜的GG再次受到惊吓……
============================================================

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
begin
    vclzip1.FilesList.Clear;
    vclzip1.FilesList.Add('C:\007.xls');
    vclzip1.ZipName :='C:\007.zip';
    vclzip1.Zip;
    showmessage('zip ok!');
    vclzip1.KeepZipOpen :=false;
end;