From 490626a2931330c323e935a7d7698ec6cf24453d Mon Sep 17 00:00:00 2001 From: youzi-3222 Date: Thu, 7 Aug 2025 12:53:25 +0800 Subject: [PATCH 1/2] =?UTF-8?q?feat(PageVersionSetup):=20=E8=87=AA?= =?UTF-8?q?=E5=8A=A8=E5=B0=86=E6=9C=8D=E5=8A=A1=E5=99=A8=E5=9C=B0=E5=9D=80?= =?UTF-8?q?=E6=9B=BF=E6=8D=A2=E4=B8=BA=E5=8D=8A=E8=A7=92=E5=86=92=E5=8F=B7?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Pages/PageVersion/PageVersionSetup.xaml.vb | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb index a11595b..3e01fe4 100644 --- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb @@ -399,6 +399,14 @@ PreFin: TextServerAuthName.Text = "LittleSkin 登录" End Sub + Private Shared Sub TextServerEnter_Change(sender As MyTextBox, e As Object) Handles TextServerEnter.LostFocus + If sender.Text.ContainsF("：") Then + If MyMsgBox("你似乎将服务器地址中的冒号打成了全角冒号，这可能会导致你无法进入服务器！" & vbCrLf & vbCrLf & "是否要将其替换为半角冒号？", + "警告", Button1:="确定", Button2:="取消", IsWarn:=True) = 1 Then + sender.Text = sender.Text.Replace("：", ":") + End If + End If + End Sub #End Region #Region "Java 选择" From 68483876f3b38ab42aaccdb13b3433d46d57aa80 Mon Sep 17 00:00:00 2001 From: youzi-3222 Date: Thu, 7 Aug 2025 21:20:42 +0800 Subject: [PATCH 2/2] =?UTF-8?q?feat(PageVersionSetup):=20=E6=9B=BF?= =?UTF-8?q?=E6=8D=A2=E4=B8=AD=E6=96=87=E5=86=92=E5=8F=B7=E4=B8=8D=E5=BC=B9?= =?UTF-8?q?=E7=AA=97=E6=8F=90=E7=A4=BA?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Pages/PageVersion/PageVersionSetup.xaml.vb | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb index 3e01fe4..6b07ace 100644 --- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionSetup.xaml.vb @@ -400,12 +400,7 @@ PreFin: End Sub Private Shared Sub TextServerEnter_Change(sender As MyTextBox, e As Object) Handles TextServerEnter.LostFocus - If sender.Text.ContainsF("：") Then - If MyMsgBox("你似乎将服务器地址中的冒号打成了全角冒号，这可能会导致你无法进入服务器！" & vbCrLf & vbCrLf & "是否要将其替换为半角冒号？", - "警告", Button1:="确定", Button2:="取消", IsWarn:=True) = 1 Then - sender.Text = sender.Text.Replace("：", ":") - End If - End If + sender.Text = sender.Text.Replace("：", ":") End Sub #End Region