GUISelButton - Выбор нескольких вариантов из выпадающего списка

CreatoR · 22 Янв 2017

AutoIt: 3.3.10.2 - 3.3.14.2
Версия: 1.2

Категория: Элементы GUI

Описание: Создание (псевдо) элемента GUISelButton для выбора нескольких вариантов из выпадающего списка.
Что то вроде ComboBox но с CheckBox-ами.
(используется библиотека GUIScrollBars_Ex от Melba23)

Код/Пример:

Код:

#include <Array.au3>
#include 'GUISelButton.au3'

$hGUI = GUICreate('GUISelButton Demo', 280, 100)

$hSelButton1 = _GUICtrlSelButton_Create('Selection Button 1', 'Item #1|Item #2|Item #3', 20, 20, 130, 120, False, 'Sellect all')
$hSelButton2 = _GUICtrlSelButton_Create('Selection Button 2', '', 20, 60, 130, 120, True)

$sItems = ''

For $i = 1 To 50
	$sItems &= ($sItems ? '|' : '') & 'Other Item #' & $i
Next

_GUICtrlSelButton_SetData($hSelButton2, $sItems, 'Sellect all')
_GUICtrlSelButton_SetState($hSelButton2, $GUI_CHECKED, Random(0, 19, 1))
;GUICtrlSetState(_GUICtrlSelButton_GetID($hSelButton2), $GUI_DISABLE)

$iShowSel1_Bttn = GUICtrlCreateButton('Show selected', 180, 20, 80, 20)
$iShowSel2_Bttn = GUICtrlCreateButton('Show selected', 180, 60, 80, 20)

GUISetState(@SW_SHOW, $hGUI)

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			_GUICtrlSelButton_Delete($hSelButton1)
			_GUICtrlSelButton_Delete($hSelButton2)
			
			Exit
		Case $iShowSel1_Bttn
			$aSel = _GUICtrlSelButton_GetSelected($hSelButton1)
			_ArrayDisplay($aSel)
		Case $iShowSel2_Bttn
			$aSel = _GUICtrlSelButton_GetSelected($hSelButton2)
			_ArrayDisplay($aSel)
	EndSwitch
WEnd

Снимок:

Файл: GUISelButton.zip

История версий:

1.3
* Исправлен баг когда пункты не добавляются в случае если не используется $sSellAllCBText (пустая строка) и создаётся только один пункт в $sData.
* Исправлена проблема с отображением коротких названий пунктов.

1.2
* Исправлена проблема связанная с тем что _GUICtrlSelButton_GetSelected не возвращала первый выбранный элемент.

1.1
* Добавлена возможность отмечать все элементы сразу.
* Несколько мелких исправлений.

1.0
* Первая публичная версия

Источник: autoit-script.ru
Автор(ы): G.Sandler (CreatoR)

CreatoR · 25 Янв 2017

Небольшое обновление:

1.1
* Добавлена возможность отмечать все элементы сразу.
* Несколько мелких исправлений.

ra4o · 25 Янв 2017

Почему-то игнорирует первый пункт в выпадающих списках - если выбран , то не показывает в списке выбранных, даже если установить "Sellect all", то первого пункта не будет.

CreatoR · 27 Янв 2017

Да это моя ошибка, в следующей версии исправлю.
А пока можно заменить в библиотеке:

Код:

Local $iStart = ($ahGCSB_IDs[$hSelButton][$iGCSB_sSellAllText] ? 2 : 1)
	
	For $i = $iStart To $aInfo[0][0]

на

Код:

For $i = 1 To $aInfo[0][0]

CreatoR · 9 Мар 2017

1.2
* Исправлена проблема связанная с тем что _GUICtrlSelButton_GetSelected не возвращала первый выбранный элемент.

TERMINAL · 10 Окт 2018

Ув.CreatoR, я сначало создаю через _GUICtrlSelButton_Create пустышку, потом обрабатываю информацию для получения списка. Если попадается один пункт и я указываю без параметра "Select All" в _GUICtrlSelButton_SetData($TestKnopka, "Это пример"), то пункт этот не высвечивается-кнопка не реагирует.

Проблема получается в _GUICtrlSelButton_Create. Если указывать один пункт без разделителя "|"-срабатывает на ошибку и пропускается этот пункт для добавления. Если же добавить к пункту разделитель, тогда появляется два пункта с чекбоксами, один который пустой. Как для меня, выход-передавать обязательно разделитель, но не обрабатывать пустые значения. Поэтому добавил поправки в циклы _GUICtrlSelButton_Create и _GUICtrlSelButton_SetData:

Код:

For $i = 1 To $aItems[0]
	If StringStripWS($aItems[$i], 3) = "" Then ContinueLoop
	If StringLen($aItems[$i]) > StringLen($sBigStr) Then
		$sBigStr = $aItems[$i]
	EndIf
Next

и

Код:

For $i = 1 To $aItems[0]
	If StringStripWS($aItems[$i], 3) = "" Then ContinueLoop
	$aItems[$i] = GUICtrlCreateCheckbox($aItems[$i], 10, $iT, $aStrSize[0] + 10, 15)
	$iT += (($sSellAllCBText And $i = 1) ? 40 : 20)
Next

Буду дальше тестировать на глюки при внесении на мои изменения.

CreatoR · 24 Ноя 2018

TERMINAL [?]

выход-передавать обязательно разделитель, но не обрабатывать пустые значения. Поэтому добавил поправки в циклы _GUICtrlSelButton_Create и _GUICtrlSelButton_SetData:

Корректнее решить это так:

Код:

$aItems = StringSplit(($sSellAllCBText ? $sSellAllCBText & '|' : '') & $sData, '|')
	
	If @error And StringStripWS($sSellAllCBText, 3) <> '' Then
		$aItems = 0
	Else

в обеих функциях.
Т.е

Код:

If @error Then

заменить на

Код:

If @error And StringStripWS($sSellAllCBText, 3) <> '' Then

CreatoR · 22 Дек 2018

Обновление...

v1.3
* Исправлен баг когда пункты не добавляются в случае если не используется $sSellAllCBText (пустая строка) и создаётся только один пункт в $sData.
* Исправлена проблема с отображением коротких названий пунктов.

Автор темы	Похожие темы	Форум	Ответы	Дата
J	Выбор пункта ControlTreeView по части имени пункта	Общие вопросы по AutoIt	1	20 Ноя 2023
	FileOpenDialog и FileSelectFolder не справляются. Мультивыбор файлов и/или папок	Общие вопросы по AutoIt	11	23 Апр 2023
S	Выбор из двух	Стол заказов	0	6 Дек 2022
	Добавить Checkbox'ы выбора	Общие вопросы по AutoIt	11	21 Май 2022
F	Элементы GUI _GUICtrlListView_ClickItem выбор определённой ячейки	Общие вопросы по AutoIt	3	10 Май 2022

Поиск

Поиск

GUISelButton - Выбор нескольких вариантов из выпадающего списка

CreatoR

Must AutoIt!

CreatoR

Must AutoIt!

ra4o

AutoIT Гуру

CreatoR

Must AutoIt!

CreatoR

Must AutoIt!

TERMINAL

Новичок

CreatoR

Must AutoIt!

CreatoR

Must AutoIt!