找回密码
 加入
搜索
查看: 1502|回复: 7

[AU3基础] _WinAPI_ShellExtractIcon这个文件哪个有,能发一下吗,谢谢!(已解决)

  [复制链接]
发表于 2018-3-24 20:54:39 | 显示全部楼层 |阅读模式
本帖最后由 qsy666888 于 2018-3-25 14:02 编辑



WinAPIEx.au3里面不含这个代码
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WinAPIEx.au3>
GUICreate("xxxxxxxx", 560, 180)
$hListView = GUICtrlCreateListView("", 8, 8, 545, 150)
GUICtrlSendMsg(-1, $LVM_SETVIEW, 0, 0)
GUISetState()
$hImage = _GUIImageList_Create(128, 128, 5, 3)
_GUICtrlListView_SetImageList($hListView, $hImage, 0)
Local $hIcon
For $i = 0 To 2
        $hIcon = _WinAPI_ShellExtractIcon("ico.dll", $i, 128, 128)
        ConsoleWrite(_GUIImageList_ReplaceIcon($hImage, -1, $hIcon) & @CRLF)
Next
_GUICtrlListView_AddColumn($hListView, "Items")
_WinAPI_DestroyIcon($hIcon)
_GUICtrlListView_AddItem($hListView, "a", 0)
_GUICtrlListView_AddItem($hListView, "b", 1)
_GUICtrlListView_AddItem($hListView, "c", 2)
While GUIGetMsg() <> -3
WEnd

本帖子中包含更多资源

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

×
发表于 2018-3-24 23:00:07 | 显示全部楼层
回复 1# qsy666888

AUTOIT V3.3.14.2 版 以上應該就有了
 楼主| 发表于 2018-3-25 06:50:53 | 显示全部楼层
回复 2# kk_lee69

没得,我下了一个最新版,安装后也是显示这个
 楼主| 发表于 2018-3-25 06:59:24 | 显示全部楼层
发现WinAPIEx.au3 这个文件里没有这个&#160;_WinAPI_ShellExtractIcon 的一段代码。
发表于 2018-3-25 08:23:38 | 显示全部楼层
发表于 2018-3-25 08:23:57 | 显示全部楼层

本帖子中包含更多资源

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

×
发表于 2018-3-25 08:31:00 | 显示全部楼层
新版的名字改了,你还是改改吧
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WinAPI.au3>
#include <WinAPIShellEx.au3>

Local $iIndex = 0, $iTotal = _WinAPI_ExtractIconEx(@SystemDir & '\shell32.dll', -1, 0, 0, 0)

Local $hForm = GUICreate('测试 ' & StringReplace(@ScriptName, '.au3', '()'), 160, 160)
Local $idButton = GUICtrlCreateButton('下一步', 50, 130, 70, 23)
Local $idIcon = GUICtrlCreateIcon(@SystemDir & '\shell32.dll', 0, 69, 54, 32, 32)
Local $hIcon = GUICtrlGetHandle(-1)
GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $idButton
            $iIndex += 1
            If $iIndex > $iTotal - 1 Then
                $iIndex = 0
            EndIf
            _WinAPI_DestroyIcon(_SendMessage($hIcon, $STM_SETIMAGE, 1, _WinAPI_ShellExtractIcon(@SystemDir & '\shell32.dll', $iIndex, 32, 32)))
    EndSwitch
WEnd

本帖子中包含更多资源

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

×
 楼主| 发表于 2018-3-25 14:01:48 | 显示全部楼层
回复 6# rikthhpgf2005

谢谢你,谢谢大家的回复,论坛威武
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-16 18:51 , Processed in 0.262259 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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