|
本帖最后由 oceanwind 于 2013-5-20 11:12 编辑
点num_f按钮后显示出jpglist.当点击一条item后点show按钮 返回都是0.请赐教,谢谢先
代码如下:
#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <GuiTab.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>
#include <SendMessage.au3>
#include <Date.au3>
#include <Array.au3>
#include <file.au3>
#include <Math.au3>
#include <GDIPlus.au3>
#include <PostMessage_UDF.au3>
#include <ListViewConstants.au3>
#include <GuiListView.au3>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Opt('TrayMenuMode', 1) ;单击不暂停
Opt("WinTitleMatchMode", 2)
Opt("SendKeyDelay", 200)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
GUICreate("a8",200,541,@DesktopWidth-214,100)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$num_fresh_button = GUICtrlCreateButton("num_f", 1,273, 40,20)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$image_file_listview = GUICtrlCreateListView("image file", 1, 294, 199, 80)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$image_Show = GUICtrlCreatePic("", 1, 376, 40, 20)
$image_listview_clear_button = GUICtrlCreateButton("clear", 42,376, 40,20)
$image_listview_show_button = GUICtrlCreateButton("show", 83, 376, 50, 20)
GUISetState(@SW_SHOW )
;MsgBox(0,"",GUICtrlRead($unit_combo))
While 1
$msg = GUIGetMsg()
;;;;;;;;;;;;;;;;;;;
_deal_gen_msg($msg)
Sleep(50)
WEnd
Func _deal_gen_msg($mainfunc_msg)
Switch $mainfunc_msg
Case -3
Exit
Case $num_fresh_button
_select_people_number_file_folder()
Case $image_listview_clear_button
_image_file_listview_clear()
Case $image_listview_show_button
_image_file_listview_item_show()
EndSwitch
EndFunc
Func _select_people_number_file_folder()
Local $selected_file_foler = @ScriptDir & "\people_num"
_set_image_list($selected_file_foler)
EndFunc
Func _set_image_list($passed_file_folder)
Local $jpg_file_array,$si
$jpg_file_array = _FileListToArray($passed_file_folder, "*.jpg", 1)
Local $image_file_listview_hwnd = GUICtrlGetHandle($image_file_listview)
_GUICtrlListView_DeleteAllItems($image_file_listview_hwnd)
If IsArray($jpg_file_array) Then
For $i = 1 To $jpg_file_array[0]
_GUICtrlListView_AddItem($image_file_listview, $passed_file_folder & "\" & $jpg_file_array[$i])
Next
EndIf
EndFunc
Func _image_file_listview_clear()
Local $image_file_listview_hwnd = GUICtrlGetHandle($image_file_listview)
_GUICtrlListView_DeleteAllItems($image_file_listview_hwnd)
EndFunc
Func _image_file_listview_item_show()
Local $selected_image_file_listview_item = GUICtrlRead($image_file_listview)
GUICtrlSetImage($image_Show,$selected_image_file_listview_item)
MsgBox(0, "列表视图项目 ", $selected_image_file_listview_item, 2)
EndFunc |
|