resulta que en clipper (modo DOS) me funciona el siguiente ejemplo:
proceso:=iif(inkey(5)=171,"A","B")
pero en fivewin siempre me manda a "B".
esto lo uso cuando, desde el menu se selecciona x opcion y espera 5 seg a que se precione ALT+171, para hacer x o si no se presiona nada haga y , pero no me da el mismo resultado que clipper puro.
por su ayuda muchas gracias.
Gerardo,
Inkey() no se usa en FiveWin.
Abres una ventana desde esa opci贸n del men煤 ? O una caja de di谩logo ?
Antonio:
Efectivamente, abro desde una opcion del menu un dialogo con cierta informacion dependiendo si el usuario presiono Alt+171, de lo contrario muestro otro tipo de informacion.
gracias.
Gerardo,
Le has asignado el acelerador Alt+171 ( 陆 ) a una opci贸n del men煤 ?
Como lo pulsa el usuario ?
el usuario lo usa asi
entra a la opcion del menu de ventas (por decir algo) y a la opcion ventas,
aqui espera 5 seg. a que el usuario presione Alt+171 para que haga una remision (y no calcule impuestos), si el usuario no tecleo nada, entonces se hara una factura (calculando sus respectivos impuestos).
puedo mandarte a tu correo privado el porque necesito esto???
de antemano muchas gracias
If MsgYesNo( "驴 Quiere factura ?" )
...
else
...
endifGerardo, porqu茅 no sustituyes la opci贸n de ventas por dos:
O el t铆tulo que tu veas. Es que en Windows el evento de captura del teclado no se gestiona como se hac铆a en MS-DOS. Supongo que habr谩s un buffer intermedio de teclado, pero ten en cuanta que en Windows, el fluo del programa no se detiene en un punto concreto del c贸digo fuente, entonces 驴d贸nde le ordenar铆as al programa que revise el teclado?
Se me ocurre que quiz谩 podr铆a utlilizar esto al principio del m贸dulo (primer c贸dio tras pulsar la opci贸n):
SysWait( 50 )
IF GetKeyState( VK_CONTROL )
...
PROCESO PREPARATORIO CALCULO DE IMPUESTOS
...
ENDIF
Si el usuario puls贸 "CONTROL" al entrar en el m贸dulo de ventas, se bifurcar铆a por ah铆.
Si quieres controlar ALT+171, tendr谩s que systutiuir GetKeyState( VK_CONTROL ) por GetKeyState( valor de la tecla ALT+171 )
Un saludo.