Fix Bugs
This commit is contained in:
@@ -319,9 +319,9 @@ Public Class FormMain
|
||||
FrmLaunchRight.PageState = MyPageRight.PageStates.ContentStay
|
||||
If IsLinkRestart Then PageChange(PageType.Link, PageSubType.LinkIoi)
|
||||
'模式提醒
|
||||
#If DEBUG Then
|
||||
If "Debug" = "Debug" Then
|
||||
Hint("[开发者模式] PCL 正以开发者模式运行,这可能会造成严重的性能下降,请务必立即向开发者反馈此问题!", HintType.Critical)
|
||||
#End If
|
||||
End If
|
||||
If ModeDebug Then Hint("[调试模式] PCL 正以调试模式运行,这可能会导致性能下降,若无必要请不要开启!")
|
||||
'尽早执行的加载池
|
||||
McFolderListLoader.Start(0) '为了让下载已存在文件检测可以正常运行,必须跑一次;为了让启动按钮尽快可用,需要尽早执行;为了与 PageLaunchLeft 联动,需要为 0 而不是 GetUuid
|
||||
|
||||
@@ -45,9 +45,9 @@
|
||||
Version.Add("lore", GetMcFoolName(Version("id")))
|
||||
End Select
|
||||
'所有4月1日发布的版本可视为愚人节版,但不改动版本描述
|
||||
Select Case Version("releaseDate").Value(Of Date).ToString("MM'/'dd")
|
||||
Select Case Version("releaseTime").Value(Of Date).ToString("MM'/'dd")
|
||||
Case "04/01"
|
||||
If Not Version("type") == "special" Then
|
||||
If Not Version("type") = "special" Then
|
||||
Type = "愚人节版"
|
||||
Version("type") = "special"
|
||||
End If
|
||||
|
||||
@@ -556,9 +556,9 @@
|
||||
Version.Add("lore", GetMcFoolName(Version("id")))
|
||||
End Select
|
||||
'所有4月1日发布的版本视为愚人节版,但不改动版本描述
|
||||
Select Case Version("releaseDate").Value(Of Date).ToString("MM'/'dd")
|
||||
Select Case Version("releaseTime").Value(Of Date).ToString("MM'/'dd")
|
||||
Case "04/01"
|
||||
If Not Version("type") == "special" Then
|
||||
If Not Version("type") = "special" Then
|
||||
Type = "愚人节版"
|
||||
Version("type") = "special"
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user