Anular el uso de algunas teclas en dialogos.

[José Camilo]

Hola nuevamente.
Como se puede hacer para inhabilitar teclas en un dialogo.
Gracias

[Antonio Linares]

Estimado José,

Que teclas en concreto son las que quieres anular ?

[paquitohm]

Quizás este enfoque pueda ser suficiente:

Code: Select all  Expand view  RUN

b:= SetKey(VK_XXX, nil)

[José Camilo]

Gracias por responder !!
Antonio, en mi nuevo msgdate quiero anular las teclas de movimiento (flechas UP DOWN LEFT RIGTH) ya que las que cambian año funcionan bien pero no las de cambio de mes. y como por ahora no logro identificar el problema las anularía hasta ver la solución. ya lo tengo casi terminado. GRACIAS!!!

Paquito. ahora pruebo tu sugerencia. GRACIAS!!!

[sysctrl2]

Code: Select all  Expand view  RUN

oDlg:bKeyDown := {|nKey| ActionKey( nKey ) }

FUNCTION RunKey( nKey )
   ? nKey
  if nKey=25
     MsgBeep()
  endif
RETURN NIL