Mensaje - Evento... antes de perder el foco, es posible???

[ariefez]

Disculpen por la demora pero no e podido entrar estas horas, yo especialmente busco capturar el evento para los TComboBox y TDBEdit; e probado con el TApplicationEvents

Código Delphi [-]
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if Msg.message = WM_KILLFOCUS then showmessage('...');
end;

pero nunca se muestra el mensaje estoy haciendo algo mal?

[[Al González]]

¡Hola de nuevo!

Pido una disculpa. Tal parece que el mensaje wm_KillFocus no es puesto en la cola de mensajes de la aplicación (como lo supuse). Solamente es enviado al control que está por perder el foco.

Por lo tanto es recomendable recurrir a la opción de crear clases derivadas de TComboBox y TDBEdit, incluyendo en ellas los manejadores de mensajes necesarios. Pero antes de que lo hagas Ariefez, ¿podrías detallarnos el contexto de este caso? (antecedentes, objetivo, etc.). Y decirnos qué quieres que el programa realice cuando uno de los controles esté por perder el foco.

Gracias.

Al González.

[ariefez]

Claro q si, bueno mi problema surgio a causa de esto:

antes de cambiar de un ComboBox a otro control, verifico q lo ingresado se encuentra en sus items, si no esta incluido entonces muestro un mensaje ("...agregar el...").

esto lo hacia en el evento OnExit pero cuando paso de un ComboBox a otro ComboBox y se muestra el mensaje el cursor se pierde, ademas hace que me bloquee su desplegable, por eso queria saber si se podia de alguna forma capturar ese evento justo antes de q se pierda el foco;

e estado creando un derivado del ComboBox pero el Mensaje WM_KILLFOCUS solo salta cuando se pierde el foco del teclado, cuando hago clic en otro componente no pasa nada, y tambien cuando la aplicacion pierde el foco,

un ejemplo sencillo de esto seria:

colocando dos ComboBox y en sus eventos OnExit mostrar un mensaje;
al hacer clic repetidamente en cada control, uno queda bloqueado.

se puede evitar ese bloqueo de alguna forma

en mi caso no muestro los mensajes tan seguido.

[ariefez]

Este es un tema que habia dejado colgado, y como no encontre solucion en su momento opte por otra, pero ahora navegando por la web exactamente en CodeGear encontre un ejemplo q solucionaba dicho poblema, sin mas q decir aca les adjunto la solucion a dicho problema, aunque solo se implementa para el evento OnEnter es valido para OnExit.