Zaramot
I ♥ AutoIt
- Сообщения
- 1,160
- Репутация
- 660
Есть скрипт:
Как можно сделать окно прозрачным ?
P.S. WinSetTrans мне не помог.
Код:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <Date.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 632, 360, 192, 124, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_COMPOSITED)
GUISetBkColor(0x000000)
$Label1 = GUICtrlCreateLabel("00:00:00", 0, 104, 634, 165)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetFont(-1, 100, 400, 0, "Verdana")
GUISetState(@SW_SHOW)
_WinAPI_SetLayeredWindowAttributes($Form1, 0x000000, 0, $LWA_COLORKEY)
While 1
GUICtrlSetData($Label1, _NowTime())
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Как можно сделать окно прозрачным ?
P.S. WinSetTrans мне не помог.