按钮中使用EXE图标的方法

hzxymkb · 发表于 2010-1-4 13:07:02

本帖最后由 hzxymkb 于 2010-1-4 15:04 编辑

#include <GuiButton.au3>
#include <GuiImageList.au3>
#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 501, 290, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 144, 80, 147, 33,$BS_FLAT)
$hImage= _GUIImageList_Create(20, 20, 5, 1, 0)
_GUIImageList_AddIcon($hImage,"shell32.dll", 1, True)
_GUICtrlButton_SetImageList(-1, $hImage)
GUISetState(@SW_SHOW) 
#EndRegion ### END Koda GUI section ###

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

        EndSwitch
WEnd

我想把上面代码中的shell32.dll改成C:\Program Files\TTPlayer\TTPlayer.exe，让图标能在按钮中显示！有什么办法呀！

顽固不化 · 发表于 2010-1-4 14:12:50

本帖最后由顽固不化于 2010-1-4 14:15 编辑

#include <GuiButton.au3>
#include <GuiImageList.au3>
#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 501, 290, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 144, 80, 147, 33,$BS_FLAT)
$hImage= _GUIImageList_Create(20, 20, 5, 1, 0)
_GUIImageList_AddIcon($hImage,"OneKey.exe", 0, True)
_GUICtrlButton_SetImageList(-1, $hImage)
GUISetState(@SW_SHOW) 
#EndRegion ### END Koda GUI section ###

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

        EndSwitch
WEnd

lchl0588 · 发表于 2010-1-4 14:24:53

本帖最后由 lchl0588 于 2010-1-4 14:55 编辑

回复 2# 顽固不化
呵呵，我也有一段代码：

#include <GuiButton.au3>
#include <GuiImageList.au3>
#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 501, 290, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 144, 80, 147, 33,$BS_FLAT)
$hImage= _GUIImageList_Create(20, 20, 5, 1, 0)
_GUIImageList_AddIcon($hImage,"d:\Program Files\TTPlayer\TTPlayer.exe", 0, True)
_GUICtrlButton_SetImageList(-1, $hImage)
GUISetState(@SW_SHOW) 
#EndRegion ### END Koda GUI section ###

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

        EndSwitch
WEnd

不过，我的千千静听在D盘下

呵呵，经测试，只改下

_GUIImageList_AddIcon($hImage,"shell32.dll", 1, True)

这段已可，把1改为EXE已有的图标位置（参下图） shell32.dll 可以改为：d:\Program Files\TTPlayer\TTPlayer.exe可以是完整的路径，或跟顽固一样，但有点：顽固的文件必与代码在同一目录下才能运行哦
如下图是顽固的作法：

其实还有一个帖子：
点此进入另一帖

hzxymkb · 发表于 2010-1-4 15:03:03

回复 3# lchl0588

我以为图标的排列是从1开始的！
没想到是0开始的！
谢谢了！

mande_chen · 发表于 2010-1-26 23:32:15

精品！学习了~~

nmgwddj · 发表于 2010-3-7 17:21:47

顶你。这个经典。

天堂泪吻泪 · 发表于 2010-3-8 18:19:46

无意之中来到此地，哈哈！！！果然读万卷书不如走万里路啊！

shuangsexing · 发表于 2012-3-5 21:53:07

好东西呀，，，学习了

redapple2008 · 发表于 2012-3-9 13:41:20

不错，好东西，我用了。

newstayking · 发表于 2012-3-31 19:51:52

留足备用谢谢分享

coolwind · 发表于 2012-9-21 00:08:27

学习了，现在正需要

r200802 · 发表于 2014-4-16 20:44:51

谢谢，学习了。

zpmc123 · 发表于 2015-9-16 07:04:26

有用正需要

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

按钮中使用EXE图标的方法

本帖子中包含更多资源

评分

本帖子中包含更多资源

评分