PowerShell对话框倒计时的完善

5i365 · 发表于 2022-1-29 13:22:51

下面的代码是国外找的, 可以在标题栏中实现倒计时, 并且鼠标进入对话框后倒计时停止, 还能自定义对话框的位置
但是标题栏中只显示倒计时, 我需要:
1.在前面加个几个字, 例如: 倒计时:
2.对话框的位置是绝对的, 在不同分辨率下显示的地方不一样, 我想让对话框, 始终, 水平是居中, 竖直方向上, 对话框的下边离桌面的最下面50像素
找了一篇相关的文章, 但是看不太懂:
https://blog.csdn.net/wmqdn/article/details/8839753

Add-Type -Ass System.Windows.Forms
$form1 = New-Object Windows.Forms.Form
$timer1 = New-Object Windows.Forms.Timer
$timer1_Tick = {
$form1.Text = $form1.Text - 1
if ($form1.Text -eq -1)
{
$form1.Close()
}
}
$form1_MouseEnter = {
$timer1.Stop()
}
$form1.Controls.Add($label1)
$form1.ClientSize = '239, 80'
$form1.Text = '10'
$form1.StartPosition = 'Manual' #对话框的位置
$form1.Left = 880
$form1.Top = 780
$form1.add_Load($form1_Load)
$form1.add_MouseEnter($form1_MouseEnter)
# timer1
$timer1.Enabled = $True
$timer1.Interval = 1000
$timer1.add_Tick($timer1_Tick)
$form1.ShowDialog()

复制代码

idwma · 发表于 2022-1-30 18:03:36

本帖最后由 idwma 于 2022-1-30 19:51 编辑

Add-Type -Ass System.Windows.Forms
$form1 = New-Object Windows.Forms.Form
$timer1 = New-Object Windows.Forms.Timer
$timer1_Tick = {
$form1.Text = $form1.Text - 1
if ($form1.Text -eq -1)
{
$form1.Close()
}
}
$form1_MouseEnter = {
$timer1.Stop()
}
$form1.Controls.Add($label1)
$w=239
$h=80
$form1.ClientSize = "$w, $h"
$form1.Text = '10'
$form1.StartPosition = 'Manual' #对话框的位置
$xWidth = [Windows.Forms.Screen]::PrimaryScreen.WorkingArea.Width #// 获取显示器屏幕宽度
$yHeight = [Windows.Forms.Screen]::PrimaryScreen.WorkingArea.Height #// 高度
$form1.Left = $xWidth/2-$w/2
$form1.Top = $yHeight-50-$h
$form1.add_Load($form1_Load)
$form1.add_MouseEnter($form1_MouseEnter)
# timer1
$timer1.Enabled = $True
$timer1.Interval = 1000
$timer1.add_Tick($timer1_Tick)
$form1.ShowDialog()

复制代码

5i365 · 发表于 2022-1-30 19:23:20

回复 2# idwma

感谢帮忙, 好像算法有误, 现在水平方向上没有居中, 偏右, 竖直方向上, 跑到任务栏下方去了, 被任务栏盖上20像素, 我的显示器 1920*1080

5i365 · 发表于 2022-1-30 19:40:02

回复 2# idwma

感觉是不是应该把这个宽高值, 定为变量更方便一些: $form1.ClientSize = '239, 80'

idwma · 发表于 2022-1-30 19:53:04

回复 4# 5i365

可以改了

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[问题求助] PowerShell对话框倒计时的完善

评分

浏览过的版块