Ver Mensaje Individual
  #1  
Antiguo 29-11-2004
JOMABRI JOMABRI is offline
Miembro
 
Registrado: may 2004
Posts: 30
Reputación: 0
JOMABRI Va por buen camino
Unhappy Falla en Application.OnMessage

Hola amigos,

tengo el siguiente problema:

Delphi no ejecuta el manejador para el evento Application.OnMessage.

El código que tengo es el siguente:
Código Delphi [-]
     // Declaración.
     procedure AnalizaMensajes(var Msg: TMSg; Var Handled:Boolean);
  
 procedure Tform1.FormCreate(Sender: TObject);
 begin
   Application.OnMessage := AnalizaMensajes;
 end;
  
 procedure Tform1.AnalizaMensajes(var Msg: TMSg; Var Handled:Boolean);
 begin
     if Msg.wParam = VK_RETURN then
        Msg.wParam := VK_TAB;
 end;
Por favor ayudenme, esta código me funcionaba, y de un momento a otro dejo de funcionar.


Gracias

Mauricio Briñes.

Última edición por marcoszorrilla fecha: 29-11-2004 a las 21:41:03. Razón: Insertar etiquetas Delphi
Responder Con Cita