Update RegCleaner.au3 + $GUI_EVENT_CLOSE

Author: mlipok

bin/RegCleaner.au3

@@ -90,14 +90,16 @@ EndFunc   ;==>_Cleaner
 
 ;---------------------------------------------------------------------------------------
 Func __Registry_Scan_Recursive($sKey, $sSearch, $hLV, ByRef $iCount, $idStatus, $idBtnCancel)
-	Local $iIndex = 1
+	Local $iIndex = 1, $idMsg
 	While 1
 		Local $sSubKey = RegEnumKey($sKey, $iIndex)
 		If @error Then ExitLoop
 
 		If Mod($iIndex, 100) = 0 Then
 			GUICtrlSetData($idStatus, "Scanning: " & $iIndex & " keys in " & StringLeft($sKey, 40) & "...")
-			If GUIGetMsg() = $idBtnCancel Then Return SetError(1)
+			$idMsg = GUIGetMsg()
+			If $idMsg  = $idBtnCancel Then Return SetError(1)
+			If $idMsg = $GUI_EVENT_CLOSE Then Return SetError(2)
 		EndIf
 
 		Local $sFull = $sKey & "\" & $sSubKey