摘要: 在Uses中添加ShellAPI的引用 压缩:ShellExecute(Handle,'open','WinRar','a -r d:\\a.rar d:\\11.xls',nil,SW_HIDE) 解压:ShellExecute(Handle,'open','WinRar','e -r d:\\a.rar d:\\',nil,SW_HIDE) 阅读全文
posted @ 2011-04-02 11:24 马建康 阅读(413) 评论(0) 推荐(0) 编辑