TAB控件替换图片问题！(已解决)

nmgwddj · 发表于 2010-3-11 18:47:38

本帖最后由 nmgwddj 于 2010-3-11 19:19 编辑

我想设置替换图片后刷新图片资源。。但是这样做的话图片就不显示了。又没有什么好办法啊！

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 446, 377, 192, 114)
$Tab1 = GUICtrlCreateTab(16, 48, 409, 257)
GUICtrlCreateTabItem("数据1")
$Pic1 = GUICtrlCreatePic(@SystemDir & "\oemlogo.bmp", 88, 72, 249, 145)
$Button1 = GUICtrlCreateButton("替换", 152, 248, 121, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

        EndSwitch
WEnd

Func bmp()
        FileCopy('d:\dj.bmp', 'c:\windows\system32\oemlogo.bmp', 1)
        MsgBox(0, '', '替换成功')
        GUICtrlDelete ($Pic1)
        $Pic1 = GUICtrlCreatePic("c:\windows\system32\oemlogo.bmp", 40, 80, 190, 120)
EndFunc

afan · 发表于 2010-3-11 19:15:23

注释掉29行，30行改为：

GUICtrlSetImage($Pic1, @SystemDir & '\oemlogo.bmp')

nmgwddj · 发表于 2010-3-11 19:19:45

感谢afan

dos123 · 发表于 2010-3-24 20:35:01

非常不错的解决方法

masterpcc · 发表于 2010-3-24 20:43:29

唉！！看不明白！再学学！！

jevonleen · 发表于 2010-9-14 21:06:25

占个位,以后有用

		自动登录	找回密码
密码			加入

[GUI管理] TAB控件替换图片问题！(已解决)

评分

评分