PDA

Ver la Versión Completa : Quiero Saber como hacer que un boton se vea que esta siendo pulsado


Julio César
27-11-2003, 17:59:16
Un saludo colectivo para todos ustedes.


Mi duda es la siguiente, tengo una aplicación con el boton Aceptar, como yo hago que se vea pulsada cuando el usuario pulse la tecla ENTER. Tantas veces pulse ENTER en esta se vea el efecto de la pulsación.



GRACIAS ANTICIPADAS!!!

roman
27-11-2003, 18:30:33
¡Vaya requerimientos raros!

Intenta esto: pon una componente TApplicationEvents en tu formulario y escribe el siguiente código para su evento OnMessage:


if (Msg.hwnd = Button1.Handle) and (Msg.WParam = VK_RETURN) then
case Msg.message of
WM_KEYDOWN:
SendMessage(Button1.Handle, WM_LBUTTONDOWN, 0, 0);
WM_KEYUP:
ReleaseCapture;
end;


// Saludos

Julio César
27-11-2003, 18:34:11
Gracias de nuevo Roman, mefuncionó de maravillas.