在delphi6中怎么调用如下外部dos命令：‘d:\arj.exe a -jm 1.arj d:\comdebug.exe’

[神医CL]

需要用arj.exe压缩一个文件（不要问我为什么不用压缩控件，有原因，我就不说了），程序中需要用到这个压缩后的文件。
我用如下得命令，都失败(arj.exe的路径没有问题)：
winexec(PChar('d:\arj.exe a -jm 1.arj d:\comdebug.exe').sw_show);
ShellExecute(Handle,'open',PChar('d:\arj.exe'),PChar('a -jm 1.arj d:\comdebug.exe'),nil,sw_show);
在Xp的cmd里面敲命令，显然是对的：'d:\arj.exe a -jm 1.arj d:\comdebug.exe'
是不是中间的空格问题，请教大家了！！！！

[老之]

ShellExecute倒数第二个参数是路径
你这样试一下：
ShellExecute(Handle,'open',PChar('arj.exe'),PChar('a -jm 1.arj d:\comdebug.exe'),PChar('d:\'),sw_show);

[ly_liuyang]

呵呵~

[神医CL]

弄好了，帖出来，也许大家有用，呵呵
压缩：
winexec('cmd /c d:\arj.exe a -jm c:\1.arj d:\comdebug.exe', SW_SHOW);
解压缩：
//设置当前路径
SetCurrentDirectorys('c:\');//*.arj的路径
winexec('cmd /c d:\arj.exe e c:\1.arj －y', SW_SHOW);

[Blakhawk]

换个方法解决问题：

你把这些东西（压缩命令）写在一个BAT文件里头，
你的程序只要调用BAT文件就可以实现你的功能。