找回密码
 加入
搜索
查看: 2498|回复: 3

[AU3基础] GUICtrlSetData修改不了GUICtrlCreateLabel数据?【已解决】

[复制链接]
发表于 2010-5-15 17:32:52 | 显示全部楼层 |阅读模式
本帖最后由 woeiwoei 于 2010-5-15 18:19 编辑

见鬼了。大家帮我看看。。

闲的无聊,做了个 表。
$pngset=CreateTransparentGUI($Title,$pngfile,$PNG_BG_Taskbar,$PNG_BG_TRANSPARENT,$PNG_BG_AddWidth,$PNG_BG_AddHeight,$PNG_BG_Left,$PNG_BG_Top);~
$Label1 = GUICtrlCreateLabel("", 104, 15, 5, 6)
GUICtrlSetBkColor($Label1,0XC0005A)
GUICtrlSetCursor($Label1,0)
$Label2 = GUICtrlCreateLabel("", 50, 30,30, 30)
GUICtrlSetFont(-1,10,'','',$font)
GUICtrlSetColor(-1, 0x680402)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
$clock=GUICtrlCreateLabel("",45,40,120,30)
GUICtrlSetFont($clock,22,'','',$font)
GUICtrlSetColor($clock, 0x680402)
GUICtrlSetBkColor($clock, $GUI_BKCOLOR_TRANSPARENT)
GUISetState(@SW_SHOW)
While 1
_ReduceMemory(@AutoItPID)
$LbR = GUICtrlRead($clock)
$Nw = _NowTime(5)
If $Nw <> $LbR Then GUICtrlSetData($clock, $Nw)
$nMsg = GUIGetMsg()
Switch $nMsg
        Case $GUI_EVENT_CLOSE
                Exit
        Case $Label1
                Run(@ProgramFilesDir&'\TTPlayer\TTPlayer.exe')
_WinAPI_GetWindowDC($pngset)
_WinAPI_ReleaseDC($pngset,$pngset)
EndSwitch
WEnd

Func _ReduceMemory($i_PID = -1)
        If $i_PID <> -1 Then
                        Local $ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $i_PID)
                        Local $ai_Return = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $ai_Handle[0])
                        DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $ai_Handle[0])
        Else
                        Local $ai_Return = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', -1)
        EndIf
        Return $ai_Return[0]
EndFunc

While 1
If @HOUR > 12 And @MIN = 00 And @SEC >00 Then
GUICtrlSetData($Label2,"PM")
Else
GUICtrlSetData($Label2,"AM")
EndIf
Sleep(1000)
WEnd
也不知道我这样写 是错误的呢 还是 其他啥原因。导致 $Label2 的数据 显示不出来。
但是 在 $Label2 = GUICtrlCreateLabel("AM或者PM", 50, 30,30, 30)这里加上 AM 或PM 就可以显示了。
不加就不显示。$clock 那句没加 也没什么问题啊。
为啥?大大们给看看。。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2010-5-15 17:52:06 | 显示全部楼层
While 1
If @HOUR > 12 And @MIN = 00 And @SEC >00 Then
GUICtrlSetData($Label2,"PM")
Else
GUICtrlSetData($Label2,"AM")
EndIf
Sleep(1000)
WEnd
这段代码运行不到,当然不能改了
 楼主| 发表于 2010-5-15 18:03:56 | 显示全部楼层
那如何写呢???
 楼主| 发表于 2010-5-15 18:19:15 | 显示全部楼层
搞定!!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-6-3 12:40 , Processed in 0.074423 second(s), 21 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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