Xailer & OZ Software

Necesito controlar un TUpDown con lo siguiente:
Up = incrementar en 1.0
Down = decrementar en 1.0
Ctrl+Up = incrementar en 0.5
Ctrl+Down = decrementar en 0.5
Shft+Up = incrementar en .01
Shft+Down = decrementar en .01
Alguna idea?, ya cheque la clase, pero aun no le hayo, sigo buscando...
Gracias.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--

Ramón,
Necesito controlar un TUpDown con lo siguiente:
Up = incrementar en 1.0
Down = decrementar en 1.0
Ctrl+Up = incrementar en 0.5
Ctrl+Down = decrementar en 0.5
Shft+Up = incrementar en .01
Shft+Down = decrementar en .01
Alguna idea?, ya cheque la clase, pero aun no le hayo, sigo buscando...
Puedes utilizar el evento OnChange del TUpDown y ahí­ comprobar si se ha pulsado alguna de las teclas de cambio, y así­ modificar el valor como necesites. P.ej.:
IF lGetKeyState( VK_CONTROL )
IF nDelta > 0
// Incrementar en 0.5
ELSE
// Decrementar en 0.5
ENDIF
ELSEIF lGetKeyState( VK_SHIFT )
...
ENDIF
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--