[ecfisa]

Declaras un puntero a TMsg, ese puntero no apunta a nada válido, no está inicializado.

Hola escafandra.

Tenés toda la razón sobre el puntero (que es innecesario) y sobre el apuro , escribí el código directo sobre el mensaje y la traducción no fué la mejor...

Pero con referencia a el código:

void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
   if(Key == VK_RETURN){
     Key = 0;  // no quita el Beep
     SelectNext(ActiveControl, true, true);
   }
}

que mencinás arriba, recordaba que en Delphi la asignación Key:= 0; no quita el beep (por eso usaba PeekMessage), por lo que lo probé en Builder y tampoco lo hace.

Un saludo.