xkbin 发表于 2008-8-29 08:32:41

au3能不能做异形窗口

如题能不能把窗口做成这样子

[ 本帖最后由 xkbin 于 2008-8-29 17:18 编辑 ]

abcabc8759 发表于 2008-8-29 09:19:11

以前在论坛上看过，好像调用API函数可以实现你的要求，但我是菜菜，给你写不出来！

asdf 发表于 2008-8-29 09:51:05

弹出式分层窗口，加背景图片，图片中白色部分自动透明掉。然后再在上面做控件应该就行了。

高级的可以用“设定层属性”那个api，那样可以指定透明色。

要注意的是：移动这样的窗口可能会很吃内存、cpu（au3自身毛病），而且写这样的窗口很烦。

gooker 发表于 2008-8-29 12:51:31

你可以看这里
http://www.autoitx.com/forum.php?mod=viewthread&tid=2394&extra=page%3D2

xkbin 发表于 2008-8-29 17:06:57

回复 4# gooker 的帖子

太谢谢了,:face (36):
基于上面的效果,以下内容在我机子无效果(我的AU3版本是:3.2.13.7.1)
$Button1 = GUICtrlCreateButton("Select PNG Folder", ($PNG_GUI-115)/2, $PNG_GUI-20, 115, 25, 0)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                       
                Case $Button1
                        $var = FileSelectFolder("请选择一个包含PNG图片的文件夹：", "",1, @WorkingDir)
                        If $var<> "" Then
                                FileChangeDir($var)
                                $search = FileFindFirstFile("*.png")
                                If $search = -1 Then
                                        MsgBox(0, "错误", "文件不存在!")
                                Else
                                        While 1
                                                $file = FileFindNextFile($search)
                                                If @error Then ExitLoop
                                                $pos = WinGetPos ($PNG_GUI,"")
                                                GUIDelete ($PNG_GUI)
                                               
                                                $PNG_GUI = CreateTransparentGUI("",$file,0,240,0,100,$pos,$pos)
                                                $Label1 = GUICtrlCreateLabel("File Name : "&$file, 0, $PNG_GUI-20, $PNG_GUI, 25)
                                               
                                                GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
                                                GUICtrlSetColor(-1, 0xFF0000)
                                                GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
                                                Sleep(2000)
                                        WEnd
                                        GUICtrlDelete($Label1)
                                        $Button1 = GUICtrlCreateButton("Select PNG Folder", ($PNG_GUI-115)/2, $PNG_GUI-20, 115, 25, 0)
                                EndIf
                                FileClose($search)
                        EndIf
        EndSwitch
WEnd

[ 本帖最后由 xkbin 于 2008-8-29 18:02 编辑 ]

asdf 发表于 2008-8-29 23:00:56

我的3.2.11.1通过了，很好，比用pic控件好很多。
png的alpha通道不仅仅是比bmp的magicpink、gif的透明色好一点，而是
    alpha通道 = 王道
好！

lcp001 发表于 2009-7-7 21:08:34

顶一下！感觉很强大！







摩托罗拉对讲机

devilma 发表于 2009-7-9 14:42:47

真好看，很强大啊
页: [1]
查看完整版本: au3能不能做异形窗口