返回列表 发帖

[交流] 怎样在listview里面添加按钮或者复选框

  1. #include <ButtonConstants.au3>
  2. #include <GUIConstantsEx.au3>
  3. #include <TabConstants.au3>
  4. #include <WindowsConstants.au3>
  5. #include <GuiTab.au3>
  6. #include <GuiListView.au3>
  7. #include <GuiImageList.au3>
  8. #include <WinAPISys.au3>
  9. #include <GuiEdit.au3>
  10. #include <array.au3>
  11. #include <WinAPIFiles.au3>




  12. #Region ### START Koda GUI section ### Form=
  13. $Form1 = GUICreate("Form1", 615, 438, 192, 124)
  14. $Tab1 = GUICtrlCreateTab(8, 8, 593, 417)
  15. $TabSheet1 = GUICtrlCreateTabItem("基础功能")
  16. $TabSheet2 = GUICtrlCreateTabItem("软件安装")
  17. $Group1 = GUICtrlCreateGroup("", 24, 56, 75, 337)
  18. $Button1 = GUICtrlCreateButton("设计软件", 24, 56, 75, 25)
  19. $Button3 = GUICtrlCreateButton("办公软件", 24, 80, 75, 25)
  20. $Button4 = GUICtrlCreateButton("浏览器设置", 24, 104, 75, 25)
  21. $Button5 = GUICtrlCreateButton("文印打印机", 24, 128, 75, 25)
  22. $Button6 = GUICtrlCreateButton("邮箱配置", 24, 152, 75, 25)
  23. $Button7 = GUICtrlCreateButton("系统优化", 24, 176, 75, 25)
  24. $Button8 = GUICtrlCreateButton("其他", 24, 200, 75, 25)
  25. GUICtrlCreateGroup("", -99, -99, 1, 1)
  26. $ListView1=GUICtrlCreateListView("", 112, 56, 441, 337)
  27. GUICtrlSetBkColor(-1, $CLR_MONEYGREEN)
  28. _GUICtrlListView_AddColumn($ListView1, "软件名",150)
  29. _GUICtrlListView_AddColumn($ListView1, "软件架构",100)
  30. _GUICtrlListView_AddColumn($ListView1, "软件路径",150)
  31. _GUICtrlListView_AddColumn($ListView1, "备注",41)
  32. $TabSheet3 = GUICtrlCreateTabItem("软件卸载")
  33. GUICtrlCreateTabItem("")
  34. GUISetState(@SW_SHOW)
  35. #EndRegion ### END Koda GUI section ###

  36. Global $cczzgjpzwj="D:\Mydata\ex_jiangchao\Desktop\cc自助工具1.1\is.ini"
  37. IniWrite($cczzgjpzwj,"设计软件","1","AutoCAD_2010")
  38. IniWrite($cczzgjpzwj,"设计软件","2","PTC_Creo_3.0")
  39. IniWrite($cczzgjpzwj,"设计软件","3","Altium Designer Summer 09")
  40. IniWrite($cczzgjpzwj,"办公软件","1","office2010")
  41. IniWrite($cczzgjpzwj,"办公软件","2","visio2010(32)")
  42. IniWrite($cczzgjpzwj,"办公软件","3","project2010(32)")
  43. IniWrite($cczzgjpzwj,"AutoCAD_2010","软件架构","64bit")
  44. IniWrite($cczzgjpzwj,"AutoCAD_2010","软件路径","10.33.162.55")
  45. IniWrite($cczzgjpzwj,"PTC_Creo_3.0","软件架构","64bit")
  46. IniWrite($cczzgjpzwj,"PTC_Creo_3.0","软件路径","10.33.162.55")
  47. IniWrite($cczzgjpzwj,"Altium Designer Summer 09","软件架构","32/64bit")
  48. IniWrite($cczzgjpzwj,"Altium Designer Summer 09","软件路径","10.33.162.55")
  49. IniWrite($cczzgjpzwj,"office2010","软件架构","32/64bit")
  50. IniWrite($cczzgjpzwj,"office2010","软件路径","10.33.162.55")
  51. IniWrite($cczzgjpzwj,"visio2010(32)","软件架构","32bit")
  52. IniWrite($cczzgjpzwj,"visio2010(32)","软件路径","10.33.162.55")
  53. IniWrite($cczzgjpzwj,"project2010(32)","软件架构","32bit")
  54. IniWrite($cczzgjpzwj,"project2010(32)","软件路径","10.33.162.55")





  55. Func _sj()
  56.    GUICtrlSendMsg($ListView1, $LVM_DELETEALLITEMS, 0, 0)
  57.    Local $IniFile = "D:\Mydata\ex_jiangchao\Desktop\cc自助工具1.1\is.ini"
  58.    Local $aIni = IniReadSection($IniFile,"设计软件")
  59.    If @error Then Exit MsgBox(4096, "", "错误, 读取INI文件失败.")
  60.    Local  $jj, $var
  61.    For $jj = 1 To $aIni[0][0]
  62.    $var = IniReadSection($IniFile, $aIni[$jj][1])
  63.    GUICtrlCreateListViewItem($aIni[$jj][1]&"|"&$var[1][1]&"|"&$var[2][1],$ListView1)
  64.    Next
  65. EndFunc

  66. Func _bg()
  67.    GUICtrlSendMsg($ListView1, $LVM_DELETEALLITEMS, 0, 0)
  68.    Local $IniFile = "D:\Mydata\ex_jiangchao\Desktop\cc自助工具1.1\is.ini"
  69.    Local $aIni = IniReadSection($IniFile,"办公软件")
  70.    If @error Then Exit MsgBox(4096, "", "错误, 读取INI文件失败.")
  71.    Local  $jj, $var
  72.    For $jj = 1 To $aIni[0][0]
  73.    $var = IniReadSection($IniFile, $aIni[$jj][1])
  74.    GUICtrlCreateListViewItem($aIni[$jj][1]&"|"&$var[1][1]&"|"&$var[2][1],$ListView1)
  75.    Next

  76. EndFunc


  77. While 1
  78.         $nMsg = GUIGetMsg()
  79.         Switch $nMsg
  80.                 Case $GUI_EVENT_CLOSE
  81.                         Exit
  82.                  Case $Button1
  83.                 _sj()
  84.          Case $Button3
  85.                    _bg()

  86.      EndSwitch
  87. WEnd
复制代码
附件: 您需要登录才可以下载或查看附件。没有帐号?加入

回复 1# jcaixuexi
应该先把窗口和各种控件使用基础学好,
然后学习控件的函数应用。
一:搜索论坛相关的例子
二:查看帮助文件
三:下载一个目前要练习的例子,反复的编译修改,了解例子里的窗口控件及控件的函数使用。
这样你才能写出你的程序。
如果象目前这种学习方法,最后代码有几句是自己写的?只不过是编辑合成???

TOP

回复 2# chzj589


    目前接触au3时间不长,感觉这个东西很好,在慢慢摸索过程中学习,不懂的地方可能问下,有的时候也想啦很长时间的,实在想不出来的,就问下,多谢前辈的指导。

TOP

回复 3# jcaixuexi
是这种效果,界面可生成,正在研究中


附件: 您需要登录才可以下载或查看附件。没有帐号?加入

TOP

回复 4# chzj589



正在研究,怎样选择listview选项之后,点击安装,安装所需要的。
附件: 您需要登录才可以下载或查看附件。没有帐号?加入

TOP

回复 5# jcaixuexi
下载例子学习会快一点理解

附件: 您需要登录才可以下载或查看附件。没有帐号?加入

TOP

回复 6# chzj589

只有图片哦,哈哈,代码能上传看看吗

TOP

回复  chzj589

只有图片哦,哈哈,代码能上传看看吗
jcaixuexi 发表于 2017-1-14 12:54

我就是下载别人的例子,所以上传就不好意思了。
论坛搜索吧

TOP

先从帮助做起,举一翻三写一些简单的示例来搞明白它,然后再看别人的源码,最好全部写上注释。

TOP

返回列表