2008年11月26日
命令行解压缩文件
摘要： 命令行解压缩文件 ShellExecute(Handle,'open',PChar('command.com'), PChar('/c '+ExtractFilePath(ParamStr(0))+'unrar x '+ fabsdir+fupdatecab+' '+fabsdir),nil,sw_show); 阅读全文
posted @ 2008-11-26 14:13 delphi中间件 阅读(196) 评论(0) 推荐(0)