FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
TPZBtn
Amigos.
Estoy haciendo un boton, TPZBtn = class( TWinControl ) El mismo tiene 4 TPictures, Up, Down, Focus y Disabled. Cómo hago para asignar el bitmap del TPicture cuando el control toma el foco??? (asignar es FPicture.Picture.Assign( FPictureFocus ), pero no logro detectar cuando el boton toma el foco o deja de estar Enabled) Saludos Pablo Z |
#2
|
||||
|
||||
Cita:
Revisa esta página. Ahí se explica de forma detallada cómo capturar los mensajes y añadirlos a un componente. Si buscas en los foros, también encontrarás información similar. Ya hemos hablado otras veces del tema (1, 2).
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Cita:
Sobreescribí: procedure WMSetFocus(var Message: TWMSetFocus); message WM_SETFOCUS; procedure WMKillFocus(var Message: TWMSetFocus); message WM_KILLFOCUS; para que muestren el TPicture correspondiente y funcionó. Ahora estoy viendo cómo hacer que pueda tomar el foco al navegar con la tecla TAB Z |
#4
|
||||
|
||||
Esto no lo entedí. ¿Puedes explicarlo? Normalmente los componentes ya "pasan" el foco cuando pulsas el TAB.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
Cita:
Está quedando muy lindo... Ahora me falta Capturar el click del mouse para cambiar el estado a down... hice: procedure WMLButtonDown(var Message: TWMLButtonDown); message WM_LBUTTONDOWN; procedure WMLButtonUp(var Message: TWMLButtonUp); message WM_LBUTTONUP; y en el create le puse ControlStyle := [csCaptureMouse, csClickEvents]; pero no entra en el evento probé tambien hacerlo heredar de TButtonControl, pero no logro colgarme del mouse left button down Z |
|
|
|