TMemo que no acepte RETURNs
Publicado: Mié Mar 18, 2009 6:52 pm
Intento hacer que un TMemo no "salte" de línea cuando se pulsa <RETURN>...
CLASS TMemo FROM XMemo
METHOD WMKeyDown( nKey, nFlags )
ENDCLASS
*
**
METHOD WMKeyDown( nKey, nFlags ) CLASS TMemo
IF nKey == VK_RETURN
//MsgInfo( "RETURN" ) //Este mensaje SI se muestra
RETURN Nil
ENDIF
RETURN Super:WMKeyDown( nKey, nFlags )
Pero NI CASO... el Memo sigue con lo suyo.
¿Alguna ayuda???
Un Saludo,
Xevi.
__________ Información de ESET Smart Security, versión de la base de firmas de virus 3946 (20090318) __________
ESET Smart Security ha comprobado este mensaje.
http://www.eset.com
CLASS TMemo FROM XMemo
METHOD WMKeyDown( nKey, nFlags )
ENDCLASS
*
**
METHOD WMKeyDown( nKey, nFlags ) CLASS TMemo
IF nKey == VK_RETURN
//MsgInfo( "RETURN" ) //Este mensaje SI se muestra
RETURN Nil
ENDIF
RETURN Super:WMKeyDown( nKey, nFlags )
Pero NI CASO... el Memo sigue con lo suyo.
¿Alguna ayuda???
Un Saludo,
Xevi.
__________ Información de ESET Smart Security, versión de la base de firmas de virus 3946 (20090318) __________
ESET Smart Security ha comprobado este mensaje.
http://www.eset.com