[Lazarus-es] formkeypress problemas

[Paola Bruccoleri]

Hola todos..

En los forms donde quiero pasar de un control a otro con enter, heredo 
de otro (frmEnterESC) que tiene programado en el formkeypress y 
formkeydown dicho comportamiento. Funciona todo ok
Pero, tengo otro form especial, donde no quiero heredar de ese, sino 
colocar en dichos eventos un código similar, pero modificado, ya que 
además, no quiero cerrar el form con ESC sino que haga otra cosa.

Entonces, copié/pegué el código de esos eventos del  frmEnterESC en 
este, modifiqué la herencia del form y listo. Por ahora como no cambié 
nada más, se supone que DEBE funcionar igual que antes (la propiedad 
keypreview del form está en true). Pero no funciona!
Estoy depurando, y cuando presiono enter en cq control (son edits) no 
pasa por elevento onkeypress ni onkeydown.

Este es el MISMO código q tengo en frmEnterESC

procedure TfrmAgregar.FormKeyDown(Sender: TObject; var Key: Word;
   Shift: TShiftState);
begin
   if (Key =  27) then
      begin
        Key := 0;
        Close;
      end;
end;

procedure TfrmAgregar.FormKeyPress(Sender: TObject; var Key: char);
begin
   if (key =  #13) and not(ActiveControl is TCustomButton) then
     begin
       SelectNext(ActiveControl, True, True);
       Key := #0;
     end
end;

qué podrá estar pasando???
muchas gracias!