Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

当PCL2在下载文件夹中运行时给予提示以告知用户 #5183

Closed
wants to merge 7 commits into from

Conversation

ZeroWolf233
Copy link
Contributor

如题
关联Issue #5163
总是看到别人PCL跑在下载文件夹里然后第二天来问我他pcl2在哪(已红温
故作此pr

@3gf8jv4dv 3gf8jv4dv added · 优化 等待确认 已经过社区确认,等待开发者确认 labels Nov 25, 2024
Copy link
Collaborator

@3gf8jv4dv 3gf8jv4dv left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

  1. 上一个「检测异常环境」提示的第二行开头使用了「程序」。建议语言风格与 PCL 其余部分一致;
  2. 龙猫在 PCL 程序代码中全部使用了「你」而非「您」。建议与此保持一致。

Dim currentDirectory As String = My.Computer.FileSystem.CurrentDirectory
' 在下载文件加中运行时给予提示以告知用户
If currentDirectory.ToLower().Contains("download") OrElse currentDirectory.Contains("下载") Then
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "PCL 目前似乎在您的下载文件夹中运行,这虽然大概率不会影响运行,但是您下次可能会找不到 PCL 在哪,建议您尽快将 PCL 复制到别处或单独的文件夹中运行", "环境警告", "我知道了", IsWarn:=True)
Copy link
Collaborator

@3gf8jv4dv 3gf8jv4dv Nov 25, 2024

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Suggested change
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "PCL 目前似乎在您的下载文件夹中运行,这虽然大概率不会影响运行,但是您下次可能会找不到 PCL 在哪,建议您尽快将 PCL 复制到别处或单独的文件夹中运行", "环境警告", "我知道了", IsWarn:=True)
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "程序目前似乎在下载文件夹中运行,虽然这可能不会影响运行,但是你下次可能会找不到 PCL 在哪。建议你尽快将 PCL 移动到别处或单独的文件夹中运行。", "环境警告", "我知道了", IsWarn:=True)

@ZeroWolf233
Copy link
Contributor Author

ZeroWolf233 commented Nov 25, 2024

  1. 上一个「检测异常环境」提示的第二行开头使用了「程序」。建议语言风格与 PCL 其余部分一致;
  2. 龙猫在 PCL 程序代码中全部使用了「你」而非「您」。建议与此保持一致。

ok改了

Copy link
Collaborator

@3gf8jv4dv 3gf8jv4dv left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

抱歉还有一个地方。我也刚发现,编辑时你可能没看到。

句尾漏标点。

Dim currentDirectory As String = My.Computer.FileSystem.CurrentDirectory
' 在下载文件加中运行时给予提示以告知用户
If currentDirectory.ToLower().Contains("download") OrElse currentDirectory.Contains("下载") Then
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "程序目前似乎在下载文件夹中运行,虽然这可能不会影响运行,但是你下次可能会找不到 PCL 在哪。建议你尽快将 PCL 移动到别处或单独的文件夹中运行", "环境警告", "我知道了", IsWarn:=True)
Copy link
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Suggested change
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "程序目前似乎在下载文件夹中运行,虽然这可能不会影响运行,但是你下次可能会找不到 PCL 在哪。建议你尽快将 PCL 移动到别处或单独的文件夹中运行", "环境警告", "我知道了", IsWarn:=True)
MyMsgBox("不建议在下载文件夹中运行 PCL!" & vbCrLf & "程序目前似乎在下载文件夹中运行,虽然这可能不会影响运行,但是你下次可能会找不到 PCL 在哪。建议你尽快将 PCL 移动到别处或单独的文件夹中运行", "环境警告", "我知道了", IsWarn:=True)

@ZeroWolf233
Copy link
Contributor Author

ZeroWolf233 commented Nov 25, 2024

抱歉还有一个地方。我也刚发现,编辑时你可能没看到。

句尾漏标点。

没事,改了(
论我一向来的不加标点符号的语言习惯

@3gf8jv4dv
Copy link
Collaborator

好。等龙猫意见。

@LTCatt
Copy link
Member

LTCatt commented Nov 25, 2024

#5163 (comment)

@LTCatt LTCatt closed this Nov 25, 2024
@LTCatt LTCatt added 拒绝 / 放弃 不会制作该功能,或无法修复该 Bug and removed 等待确认 已经过社区确认,等待开发者确认 labels Nov 25, 2024
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
· 优化 拒绝 / 放弃 不会制作该功能,或无法修复该 Bug
Projects
None yet
Development

Successfully merging this pull request may close these issues.

3 participants