求一个托盘消息框，能正常加载皮肤的
在屏幕左下角滑入滑出的，论坛上搜到一个加载皮肤之后不正常#include <GuiConstantsEx.au3>#include <WindowsConstants.au3>
; Simple Example
_TrayMessageBox("托盘消息框", "这是一个托盘消息框文本" & @CRLF & @CRLF & " ...谢谢")
Func _TrayMessageBox($TBTitle, $TBText, $TBwidth = 220, $TBheight = 100, $display_Time = 5000)
$TBgui = GUICreate($TBTitle, $TBwidth, $TBheight, @DesktopWidth - ($TBwidth + 12), @DesktopHeight - ($TBheight + 53), -1, $WS_EX_TOOLWINDOW)
$Status = GUICtrlCreateLabel($TBText, 20, 20)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $TBgui, "int", 1000, "long", 0x00040008);slide-in
GUISetState()
Sleep($display_Time)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $TBgui, "int", 1000, "long", 0x00050004);slide-out
GUIDelete($TBgui)
EndFunc ;==>_TrayMessageBox 不知道你想做成什么杨的效果？ 就是类似1楼代码的效果
在托盘图标处滑上来，然后滑下去
只是1楼代码加了皮肤之后，滑下去时就没有皮肤了
页:
[1]