试试这个有效果没
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>
$Form1 = GUICreate("万年历", @DesktopWidth, @DesktopHeight, -1, -1, $WS_POPUP, $WS_EX_LAYERED)
GUISetBkColor(0xABCDEF)
_WinAPI_SetLayeredWindowAttributes($Form1, 0xABCDEF, 255);这个函数实现的效果
Local $oCalendar = ObjCreate("ShockwaveFlash.ShockwaveFlash")
If IsObj($oCalendar) Then
GUICtrlCreateObj($oCalendar, 0, 0, 540, 440)
$oCalendar.SAlign = "T" ;对齐 顶部
$oCalendar.Movie = "http://data.ie925.com/data/flash.swf"
EndIf
GUISetState(@SW_SHOW)
Do
Sleep(10)
Until GUIGetMsg() = -3
|