How to achieve 7z format compression?

[kyjdp]

Macro Compress 7z (7-Zip)

Code:

Copy      Help

str sevenZip.expandpath("$qm$\7z.exe") ;;from c:\program files\7-zip\
;RunConsole2(F"''{sevenZip}'' -?"); ret

str file1="$qm$\qm.exe"
str file2="$my qm$\qm.7z"
file1.expandpath
file2.expandpath
out RunConsole2(F"''{sevenZip}'' a ''{file2}'' ''{file1}''")

;qm.exe - 1447 KB
;qm.zip - 791 KB
;qm.7z - 644 KB

I streamlined the code and used the following code to compress the file,I would like to ask, in the Qm software, all the variables on both sides of the quotation marks, I can delete?

Macro Macro2

Code:

Copy      Help

str z7.expandpath("$qm$\7z.exe")
str zf.expandpath("$desktop$\test\file.7z")
str f.expandpath("$desktop$\test\file.doc")
RunConsole2(F"{z7} a {zf} {f}")