Power Builder - retroceder con flechas

 
Vista:

retroceder con flechas

Publicado por pablo (35 intervenciones) el 23/02/2008 02:31:19
Saludos desde Paraguay...

...Hola amigos mi consulta es la siguiente: quisiera saber si existe alguna forma de retroceder de un campo al anterior por medio de la flecha left/izquierda del teclado...desd ya muchas gracias y exitos!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:retroceder con flechas

Publicado por Jorge  (900 intervenciones) el 26/02/2008 14:11:26
Hola Amigo.
Si que puedes.
Lo vamos hacer con Windows Scrip Host (WSH) y el KeyDown

//Declara en LocalExternalFunctions
SUBROUTINE Sleep(Long lMilliSec) LIBRARY "Kernel32.dll"

//En la dw Crea un evento y llamalo, por ejemplo keypress
//a el le asignas el Event ID pbm_dwnkey

//Scrip para este Caso en el evento creado keypress

OleObject wsh
Integer li_rc
wsh = CREATE OleObject
li_rc = wsh.ConnectToNewObject( "WScript.Shell" )

Choose Case Key
Case KeyLeftArrow!
Sleep(100)
wsh.SendKeys("+{TAB}")
Case KeyRightArrow!
Sleep(100)
wsh.SendKeys("{TAB}")

End Choose

wsh.DisconnectObject()

Mucha Suerte que te ayude .
Saludos desde Argentina
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:retroceder con flechas

Publicado por TIROLOKO (41 intervenciones) el 04/03/2008 17:29:30
If KeyDown(13) Then
sle_5.setfocus() // si estas en el sle_4 con un enter te manda al sle 5
END IF

If This.Position() = 1 Then
If key = KeyLeftArrow! Then // si estas en el em_11 te manda al em_10
em_10.SetFocus()
End If
End If

If This.Position() = Len(This.text) + 1 Then
If key = KeyRightArrow! Then // si estas en el sle_4 te manda al em_5
sle_5.SetFocus()
End If
End If

este codigo es para funcionar en una ventana
adecualo a tus necesidades ..
tienes q hacer eventos de usuario para cada objeto donde vayas a poner este codifo .. los ID de usuario deben de ser pbm_keydown y por nombre yo les pongo u_key

suerte ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar