YOgen
Знающий
- Сообщения
- 58
- Репутация
- 5
При нажатии на кнопку "+" и последующем выборе папки в ListView и массив $Files добавляются все файлы из указанной папки.
А при выборе элементов в ListView и нажатии на "-" удаляется выбранное, НО в массиве то все без изменений! Подскажите, пожалуйста, как и из массива удалить соответствующие пункты.
А при выборе элементов в ListView и нажатии на "-" удаляется выбранное, НО в массиве то все без изменений! Подскажите, пожалуйста, как и из массива удалить соответствующие пункты.
Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#Include <File.au3>
#Include <Array.au3>
#include <image_get_info.au3>
$GUI = GUICreate ('Настройки', 470,420)
GUISetState (@SW_SHOW)
$Open_Button = GUICtrlCreateButton (' + ', 345,14, 26,18)
$Del_Button = GUICtrlCreateButton (' - ', 375,14, 26,18)
$ListView = GUICtrlCreateListView (' 1 | 1 ', 150,128, 304,275, $LVS_NOCOLUMNHEADER + $LVS_EX_FULLROWSELECT)
_GUICtrlListView_SetColumnWidth ($ListView, 0, 196)
_GUICtrlListView_SetExtendedListViewStyle ($ListView, $LVS_EX_GRIDLINES + $LVS_EX_INFOTIP)
While 1
$GUI_Msg = GUIGetMsg ()
Switch $GUI_Msg
Case $Open_Button
$Dest_Folder = FileSelectFolder ('Добавить папку:', '', 2)
If @error Then
ContinueLoop
Else
$Files_Temp = _FileListToArray ($Dest_Folder, '*.jpg', 1)
If Not @error Then
Dim $Files[$Files_Temp[0] + 1][2] = [[$FIles_Temp[0]]]
For $i = 1 To $Files[0][0]
$Files[$i][0] = $Dest_Folder & '\' & $Files_Temp[$i]
$Picture = _ImageGetInfo ($Files[$i][0])
$Width = _ImageGetParam ($Picture, 'Width')
$Height = _ImageGetParam ($Picture, 'Height')
$Files[$i][1] = $Width & 'x' & $Height
GUICtrlCreateListViewItem ($Files[$i][0] & '|' & ' ' & $Files[$i][1], $ListView)
Next
$Files_Temp = 0
;_ArrayDisplay ($Files) ; массив со всеми файлами
Else
EndIf
EndIf
Case $Del_Button
_GUICtrlListView_DeleteItemsSelected ($ListView)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd