Что нового

"Счетчки" по кликам

zelich

Новичок
Сообщения
149
Репутация
0
Версия AutoIt: 3.3.12.0

Описание: Скрип "счетчки" по кликам. Что-то подобное для Androida:

111bf6641ad56275bcac9fdd8cf091ca.jpg


Примечания:
В интернете не нашел...
 

hedji

Продвинутый
Сообщения
409
Репутация
94
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 237, 232, 192, 114)
$Button1 = GUICtrlCreateButton("Кнопка +", 40, 128, 161, 41)
$Button2 = GUICtrlCreateButton("Кнопка -", 40, 178, 161, 41)
$Label1 = GUICtrlCreateLabel("0", 48, 40, 140, 33, $SS_CENTER)
GUISetState(@SW_SHOW)

Func addcount()
	$count = GUICtrlRead($Label1, 0)
	$count = $count + 1
	GUICtrlSetData($Label1, $count)
EndFunc

Func minuscount()
	$count = GUICtrlRead($Label1, 0)
	$count = $count - 1
	GUICtrlSetData($Label1, $count)
EndFunc

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			addcount()
		Case $Button2
			minuscount()
	EndSwitch
WEnd
 
A

Alofa

Гость
OffTopic:
hedji
Вообще странно видеть такое применение пользовательских функций. Они ведь в первую очередь предназначены для того чтобы сокращать код.
Вот так наверно будет лучше:
Код:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
$Form1 = GUICreate("Form1", 237, 232)
$Button1 = GUICtrlCreateButton("Кнопка +", 40, 128, 161, 41)
$Button2 = GUICtrlCreateButton("Кнопка -", 40, 178, 161, 41)
$Label1 = GUICtrlCreateLabel("0", 48, 40, 140, 33, $SS_CENTER)
GUISetState(@SW_SHOW)

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			count(1)
		Case $Button2
			count(-1)
	EndSwitch
WEnd

Func count($i)
	$count = GUICtrlRead($Label1) + $i
	GUICtrlSetData($Label1, $count)
EndFunc   ;==>count
 
Верх