找回密码
 加入
搜索
查看: 1270|回复: 0

[GUI管理] 请大侠们把这两个代码合在一起吧!!

[复制链接]
发表于 2012-8-20 21:09:26 | 显示全部楼层 |阅读模式
本帖最后由 yzy26353520 于 2012-8-20 21:19 编辑
#include <WindowsConstants.au3>
Global $time = 9
$main = GUICreate("温馨提示:", 300,100,default, default,$WS_POPUP, $WS_EX_TOOLWINDOW)
$labeltip=guictrlcreatelabel("温馨提示您:",10,10)
$lbtp2=guictrlcreatelabel("请在以下时间内关闭此程序",20,30)
$Button1= GUICtrlCreatelabel("倒计时"&$time&"秒", 80, 72)
$labelzifu=guictrlcreatelabel("否则后果自负。",100,100)
GUISetState(@SW_SHOW)
AdlibRegister("_timer", 1000)
do
guigetmsg()
if processexists("taskmgr.exe") then processclose("taskmgr.exe")
until 0
Func _timer()
        $time -= 1
       GUICtrlSetData($Button1, "倒计时"&$time&"秒" )
        If $time <= 0 Then Exit
EndFunc
先执行这个代码。当这个自动结束之后,再执行:
#include <WindowsConstants.au3>
#include<guiconstantsex.au3>
$ag=guicreate(" ",@desktopwidth+100,@desktopheight+100, 200, 200, $WS_POPUP, $WS_EX_TOOLWINDOW)
guisetbkcolor(0x0404A0)
_d($ag,-100,-100)
guisetstate()
Sleep(3000)
GUISetState(@SW_HIDE)
func _d($hwnd,$x,$y)
dim $cx,$cy
DllCall("user32.dll", "long", "SetWindowPos", "long", $hWnd, "long", -1, "long", $x, _
"long", $y, "long", $cX, "long", $cY, "long",1)
endfunc

小弟试了多次,可是以失败告终……大侠们,发发慈悲吧!!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-9-30 01:42 , Processed in 0.069225 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表