DELPHI怎样调用WINRAR压缩文件？？？

Question

DELPHI怎样调用WINRAR压缩文件？？？

Answer 1

WINRAR命令行格式如下，我怎样在DELPHI中SHELL这个命令？
压缩：WINRAR A [-switches] [Files] [@File lists]解压缩：如果带目录解压缩
　　　　WINRAR X [-switches] [Files] [@File lists] [destionation folder]

Answer 2

在uses中加入ShellAPIShellExecute(handle,'open','命令',null,null,SW_SHOW );命令= winrar a c:\abc.txt

Answer 3

好想不行啊shellexecute(handle,'open','winrar a c:\test.rar c:\test.txt',nil,nil,SW_SHOW)

Answer 4

什么错？
shellexecute(handle,nil,'winrar a c:\test.rar c:\test.txt',nil,nil,SW_SHOW)

Answer 5

shellexecute(handle,nil,'winrar a c:\test.rar c:\test.txt',nil,nil,SW_SHOW)返回错误代码ERROR_PATH_NOT_FOUND值为2不过已经解决了。应该shellexecute(handle,nil,'winrar','a c:\test.rar c:\test.txt',nil,SW_SHOW)a c:\test.rar c:\test.txt应该作为PARA传递。多谢这位兄台，我怎么给你分？

Answer 6

if shellexecute(handle,nil,'winrar a c:\test.rar c:\test.txt',nil,nil,SW_SHOW)>31
 then
....
else
.....