OnKeyPress y fsMDIForm = LOCO!!!

[nicolasdom]

Jaja yo de nuevo... me he puesto a implementar las ideas que me han dado y en los dos casos me surgieron problemas.

Caso 1) Usando Application Events.

El tema es que no se de donde saco el mensaje WM_KEYDOWN. Es decir este codigo esta mal la comparacion del Msg = WM_KEYDOWN. Supongo que debe ser algo como msg.algo pero no me anduvo. (creo que con esto si me ayudan no va a haber problemas). El siguiente problema (una vez resulto esto) es sabes que letra apreto. Eso de donde lo saco? (les pongo el codigo)

procedure TMainForm.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if Msg = WM_KEYDOWN then
	ShowMessage('tecla presionada');
end;

Caso 2) Usando Lo de Foco que comento Taita. Tengo una aplicacion con un MDI. En el MainForm (fsMDIForm) tengo un menu (navbar) al estilo xp. Lo que quiero es que tambien se acceda al menu con las teclas (por compatibilidad de versiones anteriores). EJECUTO, no abro ningun hijo y sin embargo no me funca lo de las teclas. En si la pregunta es como le doy el foco al mainform si es que no lo tiene.

Muchas gracias.

Espero solucinar esto rapido... me esta demorando demasiado...

AAA por ultimo... como hacen para poner codigo delphi y les ponga colorcito? (aca en el foro!!! )