FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour GET sin longitud con espacios blancos
Posts: 174
Joined: Wed Nov 29, 2017 11:42 AM
Re: GET sin longitud con espacios blancos
Posted: Wed Dec 20, 2017 10:10 AM
Y otra...

Los EDITS, cuando se pulsa RETURN suena un 'dong' ... hace un SendMessage()
Yo lo he sacado así...
Code (fw): Select all Collapse
//...
   OVERRIDE METHOD KeyChar IN CLASS TEdit WITH xEditKeyChar
//...

FUNCTION xEditKeyChar( nKey, nFlags )
   Local Self := HB_QSelf()

   FWLOG ValType( Self ), ::ClassName()

   IF nKey == VK_RETURN
      Return 0
   ENDIF

return ::Super:KeyChar( nKey, nFlags )
Un Saludo,

Xevi.



Aprendiz de la vida!!!
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: GET sin longitud con espacios blancos
Posted: Wed Dec 20, 2017 11:06 AM

Xevi,

El comportamiento de las ventanas y de los diálogos en Windows standard no es igual, de ahí que observes esas diferencias

Cada ventana ó diálogo ó control en Windows tiene asociado un "procedimiento" (una rutina en C que controla su comportamiento).
Pues esos procedimientos NO son los mismos en todos ellos. Así es como está diseñado Windows :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion