Página 1 de 1

Modificar TDBComboBox

Publicado: Lun Sep 21, 2009 11:25 pm
por jrcsistemas
Hola.
Quiero que me funcione la tecla enter para pasar al control siguiente. Pero
observe en el fuente de TDBComBox que dice
METHOD WMKeyDown() EXTERN DC_WMKeyDown
Si modifico este metodo por
METHOD WMKeyDown( nKey, nFlags )
y
METHOD WMKeyDown( nKey, nFlags ) CLASS TComboBox
If nKey == VK_RETURN
::GoNextControl()
ELSE
RETURN Super:WMKeyDown( nKey, nFlags )
ENDIF
RETURN 0
Puedo probocar algun problema futuro ? Que es DC_WMKeyDown ?
Gracias
Juan Castañeda

Modificar TDBComboBox

Publicado: Mar Sep 22, 2009 7:40 am
por NoAccount
Juan,
Ese método esta en el módulo datacontrols.prg. Te recomiendo que su código
lo incorpores a la sobrecarga que has hecho.
Un saludo,
--
Ignacio Ortiz de Zúñiga
Xailer team
http://www.xailer.com
http://www.xailer.info
"Juan Castañeda" <jrcsistemas@speedy.com.ar> escribió en el mensaje
news:[email=4ab7ef68@svctag-j7w3v3j....]4ab7ef68@svctag-j7w3v3j....[/email]
> Hola.
> Quiero que me funcione la tecla enter para pasar al control siguiente.
> Pero observe en el fuente de TDBComBox que dice
>
> METHOD WMKeyDown() EXTERN DC_WMKeyDown
>
> Si modifico este metodo por
>
> METHOD WMKeyDown( nKey, nFlags )
>
> y
>
> METHOD WMKeyDown( nKey, nFlags ) CLASS TComboBox
>
> If nKey == VK_RETURN
> ::GoNextControl()
> ELSE
> RETURN Super:WMKeyDown( nKey, nFlags )
> ENDIF
>
> RETURN 0
>
> Puedo probocar algun problema futuro ? Que es DC_WMKeyDown ?
>
> Gracias
>
> Juan Castañeda
>
>
>

Modificar TDBComboBox

Publicado: Mar Sep 22, 2009 1:09 pm
por jrcsistemas
Gracias Ignacio. Asi lo haré.