Что нового

Кнопка - тумблер. Есть ли такая?

Centrinar

Новичок
Сообщения
100
Репутация
1
Необходима кнопка в стиле тумблера т.е. ползунок ON-OF
 

AZJIO

Меценат
Меценат
Сообщения
2,874
Репутация
1,194
Centrinar
Выбирай

Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

GUICreate("Создание кнопок используя стили")  ; will create a dialog box that when displayed is centered

GUICtrlCreateLabel('Кнопка чекбокс имеющая два состояния', 10, 5, 250, 17)

GUICtrlCreateCheckbox("--", 10,25,40,40, $BS_PUSHLIKE+$BS_ICON)
GUICtrlSetImage (-1, "shell32.dll",48, 1)

GUICtrlCreateCheckbox("--", 60,25,24,24, $BS_PUSHLIKE+$BS_ICON)
GUICtrlSetImage (-1, "shell32.dll",24, 0)

GUICtrlCreateLabel('Трёхстатусный', 155, 35, 150, 17)
GUICtrlCreateCheckbox("--", 110,25,40,40, $BS_PUSHLIKE+$BS_ICON+$BS_AUTO3STATE)
GUICtrlSetImage (-1, "shell32.dll",7, 1)

GUICtrlCreateLabel('Радио-кнопка с переключением', 10, 75, 250, 17)

GUICtrlCreateRadio("--", 10, 95,40,40, $BS_PUSHLIKE+$BS_ICON)
GUICtrlSetImage (-1, "shell32.dll", 22)

GUICtrlCreateRadio("--", 60, 95,40,40, $BS_PUSHLIKE+$BS_ICON)
GUICtrlSetImage (-1, "shell32.dll", 23)

GUICtrlCreateRadio("--", 110,95,40,40, $BS_PUSHLIKE+$BS_BITMAP)
GUICtrlSetImage (-1, "oemlogo.bmp")

GUICtrlCreateLabel('Кнопка чекбокс, но использующая картинку, а не иконку', 10, 150, 290, 17)

GUICtrlCreateCheckbox("--", 10, 170,150,140, $BS_PUSHLIKE+$BS_BITMAP)
GUICtrlSetImage (-1, "oemlogo.bmp")

GUICtrlCreateLabel('Плоские кнопки', 110, 340, 150, 17)
GUICtrlCreateButton("--", 10, 320,40,40, $BS_ICON+$BS_FLAT)
GUICtrlSetImage (-1, "shell32.dll",46, 1)
GUICtrlCreateButton("--", 60, 320,40,40, $BS_ICON+$BS_FLAT)
GUICtrlSetImage (-1, "shell32.dll",47, 1)

GUISetState ()

Do
Until GUIGetMsg()=-3
 

axlwor

Скриптер
Сообщения
657
Репутация
147
пример для _GUICtrlSlider_SetRange
+
Код:
_GUICtrlSlider_SetRange($hSlider, 1, 2)
 

AZJIO

Меценат
Меценат
Сообщения
2,874
Репутация
1,194
axlwor
я бы не сказал, что слайдер удобен, хотя возможно его использовать

Код:
#include <SliderConstants.au3>
GUICreate("Слайдер тумблер")
GUICtrlCreateSlider(10, 30, 50, 50, $TBS_VERT+$TBS_BOTH)
GUICtrlSetLimit (-1, 1, 0)
GUISetState ()
Do
Until GUIGetMsg()=-3
 
Автор
C

Centrinar

Новичок
Сообщения
100
Репутация
1
понравилась Кнопка чекбокс имеющая два состояния, но как задать разные картинки на каждое состояние?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Centrinar,
Попробуйте так:
Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

$fIcon = True

GUICreate("Создание кнопок используя стили")
$nButton = GUICtrlCreateCheckbox('', 50, 50, 40, 40, $BS_PUSHLIKE + $BS_ICON)
GUICtrlSetImage(-1, 'user32.dll', 101, 1)
GUISetState()
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $nButton
			$fIcon = Not $fIcon
			If $fIcon Then
				GUICtrlSetImage($nButton, 'user32.dll', 103, 1)
			Else
				GUICtrlSetImage($nButton, 'user32.dll', 102, 1)
			EndIf
	EndSwitch
WEnd
 
Верх