fix: 未调用 Exit 导致程序继续执行

This commit is contained in:
林轻语
2026-05-17 04:30:27 +08:00
committed by GitHub
parent f5370a1743
commit e24311c7cf
+7 -1
View File
@@ -115,7 +115,12 @@ RetryCacheCheck:
End If End If
Thread.Sleep(500) Thread.Sleep(500)
Next Next
If Not IsLocked Then DropToTopByLock(FileLockPath) If Not IsLocked Then
DropToTopByLock(FileLockPath)
DropToTopByLock(FileLockPath)
Beep()
Environment.Exit(ProcessReturnValues.Cancel)
End If
End If End If
End If End If
'设置 ToolTipService 默认值 '设置 ToolTipService 默认值
@@ -200,6 +205,7 @@ RetryCacheCheck:
Dim Pid As Integer Dim Pid As Integer
If Not Integer.TryParse(Encoding.UTF8.GetString(Content), Pid) Then Return If Not Integer.TryParse(Encoding.UTF8.GetString(Content), Pid) Then Return
ShowWindowToTop(Process.GetProcessById(Pid).MainWindowHandle) ShowWindowToTop(Process.GetProcessById(Pid).MainWindowHandle)
End Sub End Sub
'结束 '结束