jiataifeng 发表于 2008-8-24 17:45:38

网吧的所有游戏列表软件

看似简单,但在做的时候遇到了很大麻烦。
如下图类似的。但有一点,是通用的,也就是说,只需要在配置文件里添加游戏名称,路径等信息,就可以自动生成图标的列表,点击运行游戏。换句话说,有哪些图标,有多少,是动态的。
高手给个思路好吗,谢谢!

jiataifeng 发表于 2008-8-24 17:46:49

50金钱奖励!

59993330 发表于 2008-8-24 22:53:25

建议楼主用迅闪B2把

ryanzone 发表于 2009-5-3 21:03:42

:face (16):

mlrw923 发表于 2010-4-6 02:09:17

网吧菜单外面不要太多哦~~~
随便搞个不就行了~
网众迅闪易游......到处都是~~~

nmgwddj 发表于 2010-4-6 02:19:14

记得是AFAN给我的#include <GUIListView.au3>
#include <GUIImageList.au3>
#include <WinAPIEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>

Dim $folder = FileSelectFolder('请选择目标文件夹', '', 4, @MyDocumentsDir)
If @error Then Exit (Msgbox(48, '退出', '没有选择文件夹,退出'))
Dim $a = _FileListToArray($folder, '*', 1)
If $a = 0 Then Exit (Msgbox(48, '退出', '没有选择文件夹,退出'))

GUICreate('MyIconGUI', 280, 400)
$ListView = GUICtrlCreateListView('', 10, 10, 260, 344, $LVS_NOCOLUMNHEADER)
_GUICtrlListView_SetView($ListView, 1)
_GUICtrlListView_InsertColumn($ListView, 0, '', 220)
$hImageList = _GUIImageList_Create(32, 32, 6)
_GUICtrlListView_SetImageList($ListView, $hImageList, 0)
$Button = GUICtrlCreateButton('退出', 105, 361, 70, 23)

For $i = 1 To $a
      $Ext = $folder & '\' & $a[$i]
      $tSHFILEINFO = _WinAPI_ShellGetFileInfo($Ext, BitOR($SHGFI_ICON, $SHGFI_USEFILEATTRIBUTES))
      $hIcon = DllStructGetData($tSHFILEINFO, 'hIcon')
      _GUIImageList_ReplaceIcon($hImageList, -1, $hIcon)
      _GUICtrlListView_AddItem($ListView, $a[$i], $i -1)
      _WinAPI_FreeIcon($hIcon)
Next
GUISetState()

While 1
      $Msg = GUIGetMsg()
      Switch $Msg
                Case -3, $Button
                        ExitLoop
      EndSwitch
WEnd

mqb199 发表于 2010-4-9 12:11:26

好东西 ~~~~~~~~~~
页: [1]
查看完整版本: 网吧的所有游戏列表软件