AutoHotkey Community

Gui, Tab, PQServiceUSB
Gui, Add, ListBox, x35 y60 w565 r5 AltSubmit vMyListPQSMOUNT, %MountPath%
Gui, Add, GroupBox,x15 y40 w600 h100, %CREATEPQSUSB%
Gui, Add, ListBox, x35 y230 w565 r5 vMyListPQSUSB, %MergedLine%
Gui, Add, Button, x35 y145 w60 h25 gMount, Monter
Gui, Add, Button, x105 y145 w60 h25 gUnMount, Démonter
Gui, Add, GroupBox,x15 y210 w600 h100, %DESTPQSSUSB%


Mount:
{
GuiControl, +AltSubmit -g, MyListPQSMOUNT
MountPath= Z:
SB_SetText(MOUNTINPROGRESS)
RunWait,%comspec% /c MBRwrWin mount hd0:1 %MountPath%,, HIDE
SB_SetText(MOUNTIND)
Sleep, 5000
SB_SetText("")
}
GuiControl,1:, MyListPQSMOUNT,%MountPath%
Return

UnMount:
{
;GuiControl, +AltSubmit -g, MyListPQSMOUNT  (doesn' work)
;Gui, Cancel  (doesn' work)
MyListPQSMOUNT=
MountPath=
RunWait,%comspec% /c dosdev -d Z:, , HIDE
}
;GuiControl, +AltSubmit -g, MyListPQSMOUNT  (doesn' work)
GuiControl,1:, MyListPQSMOUNT,%MountPath%
Return

GuiControl,1:,MyListPQSMOUNT,|