文字跑马灯透明效果【已解决】
本帖最后由 redapple2008 于 2012-3-27 17:06 编辑怎么让文字标签透明? 下面是代码附件 是否可以考虑把文字跑马灯控件建立在单独的子窗口上, 然后依据需要设置其透明度? 是否可以考虑把文字跑马灯控件建立在单独的子窗口上, 然后依据需要设置其透明度?
user3000 发表于 2012-3-27 16:18 http://www.autoitx.com/images/common/back.gif
暂时没有找到更好的解决方法。 参考这个:
http://www.autoitx.com/thread-31164-1-1.html
里面的文本颜色:0xff00ff00
第一组'ff'就是透明度。换算成十进制就是取值0-255 参考这个:
里面的文本颜色:0xff00ff00
第一组'ff'就是透明度。换算成十进制就是取值0-255
tttbbb999 发表于 2012-3-27 16:52 http://www.autoitx.com/images/common/back.gif
谢谢了 找到了,研究一下了#include <IE.au3>
#include <WindowsConstants.au3>
#include "Marquee.au3"
Global $i = 0
Global $Array = ["white","green","blue","red","yellow"] ;字体颜色
$pos = WinGetPos("")
$Width = 695
$Height = 165
$Left = @DesktopWidth - 705
$Top = @DesktopHeight - 175 - $pos
$Jpg = "http://www.autobatch.org/bbs/images/baishe_logo.jpg"
$oIE = _IECreateEmbedded()
;无边框,层叠窗口的属性
$gui = GUICreate("缘鸟脚本",$Width,$Height,$Left,$Top,$WS_POPUP, $WS_EX_LAYERED)
GUISetBkColor(0xABCDEF) ;设置背景透明,层叠窗口才有效
GUICtrlCreateGroup ("", 1, 1, 680,150)
$obj = GUICtrlCreateObj($oIE,10, 15, 660, 90)
_IENavigate($oIE,$Jpg)
$oIE.document.body.scroll="no"
_GUICtrlMarquee_SetScroll(Default,Default, Default, 2) ;2是滚动的速度
_GUICtrlMarquee_SetDisplay(1,$Array[$i],0xABCDEF)
$Marquee = _GUICtrlMarquee_Create("欢迎访问缘鸟脚本社区 释放你的双手,让一切自动化!", 10, 120, 660, 20)
_WinAPI_SetLayeredWindowAttributes($gui, 0xABCDEF)
;~ AdlibRegister ("SetFontColor",1000)
GUISetState()
Do
Until GUIGetMsg()=-3
;~ Func SetFontColor()
;~ $i += 1
;~ If $i > 4 Then $i = 0
;~ $Marquee.document.body.style.color = $Array[$i]
;~ EndFunc
不错的效果,下载来研究! {:face (332):}{:face (332):}{:face (332):}{:face (332):}{:face (332):}
页:
[1]