Page 2 of 2

Re: GET sin longitud con espacios blancos

PostPosted: Wed Dec 20, 2017 10:10 am
by Xevi
Y otra...

Los EDITS, cuando se pulsa RETURN suena un 'dong' ... hace un SendMessage()
Yo lo he sacado así...
Code: Select all  Expand view

//...
   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 )
 

Re: GET sin longitud con espacios blancos

PostPosted: Wed Dec 20, 2017 11:06 am
by Antonio Linares
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 :-)