找回密码
 加入
搜索
查看: 4444|回复: 15

关于GUI窗口和进度条的,有哪位高人会啊?

[复制链接]
发表于 2009-4-24 15:15:14 | 显示全部楼层 |阅读模式
本帖最后由 s77m72 于 2009-4-28 09:51 编辑

做出来的效果如下图的。。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2009-4-24 18:04:18 | 显示全部楼层
用皮肤,或是用图片做,不过可能会有些闪烁。
发表于 2009-4-24 20:22:41 | 显示全部楼层
用皮肤或GDI
发表于 2009-4-25 11:10:44 | 显示全部楼层
这是我刚才用图片做的,快了闪烁比较大。介意你还是用皮肤做。
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
dim $s = 1,$Pic2
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 614, 438, 192, 114, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_DLGFRAME,$WS_POPUP,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic1 = GUICtrlCreatePic(@ScriptDir&"\背景.jpg", 0, 0, 613, 436)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
AdlibEnable ( "myadlib" , 1000 )
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

EndSwitch
WEnd
Func myadlib()
        GUICtrlSetState ( $Pic2, $GUI_HIDE )
        $Pic2 = GUICtrlCreatePic(@ScriptDir&"\进度.jpg", 18, 388, 5.76*$s, 29)
        GUICtrlSetState ( $Pic2, $GUI_SHOW )
        $s +=1
        if $s=101 then AdlibDisable ( )
EndFunc


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
 楼主| 发表于 2009-4-26 12:45:29 | 显示全部楼层
还有别的方法吗?
发表于 2009-4-26 13:02:52 | 显示全部楼层
LZ提供下背景图片
 楼主| 发表于 2009-4-26 14:27:32 | 显示全部楼层
什么图片都可以就是要做出这样的效果。。
 楼主| 发表于 2009-4-27 09:06:25 | 显示全部楼层
还有没有人会别的方法吗?
发表于 2009-4-27 18:03:05 | 显示全部楼层
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 466, 202, -1, -1, BitOR($WS_POPUP,$WS_CLIPSIBLINGS))
$Pic1 = GUICtrlCreatePic("bg.jpg", 0, 0, 465, 201, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Progress1 = GUICtrlCreateProgress(24, 144, 417, 25)
GUICtrlSetData(-1, 20)
GUISetState(@SW_SHOW)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd
 楼主| 发表于 2009-4-28 09:51:03 | 显示全部楼层
高手,谢谢。。。
发表于 2009-9-8 10:19:56 | 显示全部楼层
又学到了一招、、、
发表于 2009-9-16 10:51:54 | 显示全部楼层
好东西。收了。
发表于 2012-3-6 21:27:47 | 显示全部楼层
回复 9# 78391493
谢谢学习了。
发表于 2013-3-2 17:36:34 | 显示全部楼层
MARK备用…………
发表于 2013-5-1 14:26:00 | 显示全部楼层
下来学习一下,谢谢楼主,辛苦了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-17 11:26 , Processed in 0.079951 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表