Page 1 of 1

Sobre las últimas modificaciones en control.prg

PostPosted: Wed Feb 15, 2006 6:20 pm
by tsales
Antonio

Con las últimas modificaciones realizadas en el método Keydown en control.prg, concretamente con la inclusión de este código:
if nKey == VK_ESCAPE
::oWnd:KeyChar( nKey, nFlags )
return 0
endif

Me encuentro que la captura del método al redefinir el dialogo no hace nada.

oDlg:bKeyDown := {|nKey| if(nKey==VK_ESCAPE, (msginfo("adios"), oDlg:End()), ) }

¿Como puedo solucionar esto ahora?. ¿Es correcto ese comportamiento?
Saludos

PostPosted: Wed Feb 15, 2006 6:24 pm
by Antonio Linares
Toni,

Parece un error. Debería ser:

Code: Select all  Expand view
   if nKey == VK_ESCAPE
      ::oWnd:KeyDown( nKey, nFlags )
      return 0
   endif   


Por favor, pruébalo y nos comentas. Gracias.

PostPosted: Wed Feb 15, 2006 7:00 pm
by tsales
Antonio Linares wrote:Toni,

Parece un error. Debería ser:

Code: Select all  Expand view
   if nKey == VK_ESCAPE
      ::oWnd:KeyDown( nKey, nFlags )
      return 0
   endif   


Por favor, pruébalo y nos comentas. Gracias.


Ok
Ahora funciona perfecto.

Saludos

PostPosted: Wed Feb 15, 2006 8:38 pm
by Antonio Linares
bien! :)

gracias,