Simular encendido de botones

Esta sección es para preguntas sobre programación/scripting usando AutoHotkey.

Moderator: Flipeador

ceska
Posts: 8
Joined: 25 Jul 2017, 17:10

Simular encendido de botones

17 Oct 2018, 22:03

Hola amigos, alguien me pueda ayudar a sacarme de la duda. la idea es hacer una gui como la imagen siguiente:

http://i67.tinypic.com/22hmk1.jpg

es una gui 800 x 350 que tiene unicamente 2 botones, si no presionas ninguna tecla se mantienen en " Gris " como apagados, pero luego de presionar una de las teclas: ya se a "M" o "H" simulen que prendan , no se si me explico. La verdad ni idea de como
hacerlo, intente con Splashimage , keywait, pero el resultado no es el esperado? Gracias

P.D no importa que version se use de Autohotkey V1 o V2.
User avatar
TheDewd
Posts: 1510
Joined: 19 Dec 2013, 11:16
Location: USA

Re: Simular encendido de botones

18 Oct 2018, 08:26

Code: Select all

#SingleInstance, Force

UrlDownloadToFile, https://i.imgur.com/MaLoSie.png, toggle-off.png
UrlDownloadToFile, https://i.imgur.com/jxObwDt.png, toggle-on.png

Toggle1 := 0
Toggle2 := 0

Gui, +LastFound -Resize
Gui, Margin, 10, 10
Gui, Color, 662829
Gui, Add, Picture, x150 y127 w96 h96 vBtnToggle1 gBtnToggle1 +BackgroundTrans, toggle-off.png
Gui, Add, Picture, x550 y127 w96 h96 vBtnToggle2 gBtnToggle2 +BackgroundTrans, toggle-off.png
Gui, Show, w800 h350, Example
return

BtnToggle1:
m::
	Toggle1 := !Toggle1
	GuiControl,, BtnToggle1, % (Toggle1 ? "toggle-on.png" : "toggle-off.png")
return

BtnToggle2:
h::
	Toggle2 := !Toggle2
	GuiControl,, BtnToggle2, % (Toggle2 ? "toggle-on.png" : "toggle-off.png")
return
ceska
Posts: 8
Joined: 25 Jul 2017, 17:10

Re: Simular encendido de botones

18 Oct 2018, 20:21

Muchisimas gracias, TheDewd, me funciono a la perfeccion. Aprovechando tus conocimientos se puede modificar otro igual, pero que al momento de presionar "M" o "H" simule prender y al soltar la tecla (M o H) se apaguen los botones solos? de antemano te agradezco mucho tu tiempo y tu respuesta.
User avatar
TheDewd
Posts: 1510
Joined: 19 Dec 2013, 11:16
Location: USA

Re: Simular encendido de botones

19 Oct 2018, 07:44

Code: Select all

#SingleInstance, Force

UrlDownloadToFile, https://i.imgur.com/MaLoSie.png, toggle-off.png
UrlDownloadToFile, https://i.imgur.com/jxObwDt.png, toggle-on.png

Toggle1 := 0
Toggle2 := 0

Gui, +LastFound -Resize
Gui, Margin, 10, 10
Gui, Color, 662829
Gui, Add, Picture, x150 y127 w96 h96 vBtnToggle1 +BackgroundTrans, toggle-off.png
Gui, Add, Picture, x550 y127 w96 h96 vBtnToggle2 +BackgroundTrans, toggle-off.png
Gui, Show, w800 h350, Example
return

m::
	Toggle1 := !Toggle1
	GuiControl,, BtnToggle1, % (Toggle1 ? "toggle-on.png" : "toggle-off.png")
	KeyWait, m
	Toggle1 := 0
	GuiControl,, BtnToggle1, toggle-off.png
return

h::
	Toggle2 := !Toggle2
	GuiControl,, BtnToggle2, % (Toggle2 ? "toggle-on.png" : "toggle-off.png")
	KeyWait, h
	Toggle2 := 0
	GuiControl,, BtnToggle2, toggle-off.png
return

Return to “Pedir Ayuda”

Who is online

Users browsing this forum: No registered users and 21 guests