Hola amigos de la lista
Buscando por internet encontr� este c�digo:

procedure TfPrincipal.AppMessage(var Msg: TMsg; var Handled: boolean);
var
  actual: TWinControl;
begin
  if Msg.message = WM_KEYDOWN then
    if Msg.wParam = VK_RETURN then
    begin
      actual := Screen.ActiveControl;
      if actual.Tag = 0 then
        Msg.wParam := VK_TAB;
    end;
end;

y lo llamo de la siguiente manera en el evento OnCreate del formulario

application.onmessage;

Pero no puedo encontrar la propiedad "onmessage"; en Lazarus c�mo se hace.

Gracia por vuestro tiempo

Gustavo Cruz

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20131005/467c4c61/attachment.html>

El 05/10/2013 6:33, Gustavo Adolfo Cruz Martinez escribi�:

procedure TfPrincipal.AppMessage(var Msg: TMsg; var Handled: boolean);

[...]

y lo llamo de la siguiente manera en el evento OnCreate del formulario application.onmessage; Pero no puedo encontrar la propiedad "onmessage"; en Lazarus c�mo se hace.

Hola,

Creo que Lazarus no tiene ese "OnMessage", de todos modos, si lo que quieres es convertir el return en TAB ese no parece el mejor modo, ya que eso har�a que el return fuera TAB SIEMPRE dentro de la aplicaci�n. A mi me parece m�s l�gico hacerlo a nivel de cada form as� decides si es el form t�pico que necesita cambiar de campo con Return u otro que necesita que se comporte como los standard.