<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Hola amigos de la lista<BR>Buscando por internet encontré este código:<BR> <BR>procedure TfPrincipal.AppMessage(var Msg: TMsg; var Handled: boolean);<br>var<br>  actual: TWinControl;<br>begin<br>  if Msg.message = WM_KEYDOWN then<br>    if Msg.wParam = VK_RETURN then<br>    begin<br>      actual := Screen.ActiveControl;<br>      if actual.Tag = 0 then<br>        Msg.wParam := VK_TAB;<br>    end;<br>end;<BR> <BR>y lo llamo de la siguiente manera en el evento OnCreate del formulario<BR> <BR>application.onmessage;<BR> <BR>Pero no puedo encontrar la propiedad "onmessage"; en Lazarus cómo se hace.<BR> <BR>Gracia por vuestro tiempo<BR> <BR>Gustavo Cruz<BR>                                           </div></body>
</html>