This commit is contained in:
龙腾猫跃
2025-12-27 05:37:27 +08:00
parent 1ecff91c1c
commit a674630f54
14 changed files with 35 additions and 27 deletions
+2 -2
View File
@@ -175,10 +175,10 @@ Public Class CustomEvent
Public Shared Sub Raise(Type As EventType, Arg As String)
If Type = EventType.None Then Return
Log($"[Control] 执行自定义事件:{Type}, {Arg}")
If Arg Is Nothing Then Arg = ""
Dim Args As String() = Arg.Split("|")
Try
Dim Args As String() = If(Arg?.Split("|"), {""})
Select Case Type
Case EventType.打开网页
Arg = Arg.Replace("\", "/")
If Not Arg.Contains("://") OrElse Arg.StartsWithF("file", True) Then '为了支持更多协议(#2200)