Página 1 de 1

Introducir datos con una tecla

Publicado: 12 Feb 2013, 02:23
por gastonr
Hola soy Gaston.
No se como explicar la situación pero espero que me comprendan.

Quiero saber como leer una sola tecla y establecerla a una variable, solo ingresaria n° del 0 al 7

Deseo ejecutar este codigo, pero sin el inputbox, porque en este se debe ingresar el numero y despues enter.

Código: Seleccionar todo

$v = 1
$vN = 1
$veces = 1

Do

$vN = InputBox ("Cambio de marcha", "Coloque la marcha deseada")

If $vN >= 0 And $vN <= 6 Then
   If $vN < $v Then
	  $veces = $v - $vN
	  For $i = 1 to $veces Step 1
		 $v = $v - 1
		 Send("N° " & $v & "{ENTER}")
	  Next
   Else
	  $veces = $vN - $v
	  For $i = 1 to $veces Step 1
		 $v = $v + 1
		 Send("N° " & $v & "{ENTER}")
	  Next
   EndIf
   $v = $vN
EndIf
Until $vN = "q"
Eso es todo espero que entiendan y me ayuden.

Re: Introducir datos con una tecla

Publicado: 12 Feb 2013, 19:47
por arkcrew
Buenas,

Hay una funcion que creo que se llamaba _IsPressed que funcionaba con una dll de windows, mirala en la ayuda de autoit (F1 en scite), con esa función ves si se ha pulsado la tecla.
También puedes poner hotkeys (miralo en la ayuda también) a cada una de las teclas y llamar a una función...

Espero que te aclare algo.,.

Saludos!

Re: Introducir datos con una tecla

Publicado: 13 Feb 2013, 02:33
por BasicOs
Global miVariable
Hotkeyset(tecla1, funcion1) para cada tecla que desees

luego la función:

Func funcion1()
miVariable=1
EndFunc

Func funcion2()
miVariable=2
EndFunc
etc..........

Otra manera más avanzada es crear una sola función y luego recoger la tecla pulsada. Pero si son solo 9 teclas puedes hacerlo asi
Salu22:)

Re: Introducir datos con una tecla

Publicado: 13 Feb 2013, 19:41
por gastonr
Gracias por responder, probare lo que me proponen y les comento como me fué.