FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Sobre las últimas modificaciones en control.prg
Posts: 186
Joined: Sat Oct 08, 2005 07:32 AM
Sobre las últimas modificaciones en control.prg
Posted: Wed Feb 15, 2006 06:20 PM

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

Toni Sales
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Sobre las últimas modificaciones en control.prg
Posted: Wed Feb 15, 2006 06:24 PM
Toni,

Parece un error. Debería ser:

   if nKey == VK_ESCAPE
      ::oWnd:KeyDown( nKey, nFlags )
      return 0
   endif


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

Antonio Linares
www.fivetechsoft.com
Posts: 186
Joined: Sat Oct 08, 2005 07:32 AM
Sobre las últimas modificaciones en control.prg
Posted: Wed Feb 15, 2006 07:00 PM
Antonio Linares wrote:Toni,

Parece un error. Debería ser:

   if nKey == VK_ESCAPE
      ::oWnd:KeyDown( nKey, nFlags )
      return 0
   endif


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


Ok
Ahora funciona perfecto.

Saludos
Toni Sales
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Sobre las últimas modificaciones en control.prg
Posted: Wed Feb 15, 2006 08:38 PM

bien! :)

gracias,

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion