有个shellexecute()的问题

Question

case shellexecute(handle,'open','c:\arj\arj.exe',pchar(command),'',sw_shownormal) of
   ERROR_FILE_NOT_FOUND: messagedlg('file not found',mtconfirmation,[mbok],0);
   SE_ERR_ACCESSDENIED: messagedlg('拒绝访问，可能资源正被使用',mtconfirmation,[mbok],0);
else
    messagedlg('恢复成功！',mtconfirmation,[mbok],0);其中command是arj.exe执行的一条命令。
现在arj.exe这个命令还没执行完，恢复成功的提示就出来了，怎么解决？？谢谢

Answer 1

shellexecute执行成功后正常返回，而这时候arj.exe也在正常执行。
所以我觉得不应该用shellexecute的返回值来作判断，因为这个返回值判断的只是 arj.exe的调用情况，至于它执行的怎么样 shellexecute 不会关心的。