[Paoti]

si funciona, lo he probado con el turbo delphi y esta funcionando.

no sé que pueda pasar.

¿tienes algo programado en los demás eventos de la caja de texto?

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if (key=#13) then
  begin
   ShowMessage('ahora que pasa');
   Caption := 'Entro en el Enter';
   Button1.Caption := 'Entro en el enter';
  end;
end;