this should be what your after
str s1=
;list disk
;list vol
__TempFile f.Init(".bat" "" "" s1)
str ss1
RunConsole2 F"cmd.exe /C diskpart /s ''{f}''" ss1
MES m
m.style="O";;style is ok button only see qm help for more info
m.timeout=5;;close after 5 seconds
m.default='O';;ok button is default
int i=mes(ss1 "QM Message" m)