命令行解压缩文件 命令行解压缩文件 ShellExecute(Handle,'open',PChar('command.com'), PChar('/c '+ExtractFilePath(ParamStr(0))+'unrar x '+ fabsdir+fupdatecab+' '+fabsdir),nil,sw_show);