Código Delphi [-]WinExec(PChar('winrar x y ' + flname.FileName), SW_HIDE);
WinExec(PChar('winrar x y ' + flname.FileName), SW_HIDE);