Agregar Evento a una Clase

[ecfisa]

Hola.

Me alegra muchisimo que te haya servido.

La idea se me cruzó por que varios controles entre los que está TPanel, no pueden recibir el foco desde teclado.
Pero lo que la encauzó fue un código que habia leido (y usado) de Zarko Gajic para detectar la tecla TAB en un TEdit:

Código Delphi [-]
procedure CMDialogKey(Var Msg: TWMKey) ;message CM_DIALOGKEY;

implementation

procedure TForma.CMDialogKey(Var Msg: TWMKEY) ;
begin
  if (ActiveControl is TEdit) and (Msg.Charcode = VK_TAB) then
   ShowMessage('TAB key pressed?') ;
  inherited;
end;

Así que la info y los laureles son de Zarko...

Un saludo.

[FENIXadr]

Al amigo Zarko Gajic habría que localizarlo y hacerle unas cuantas preguntitas jeje...

bueno muchisimas gracias (again) y este hilo se puede dar por finalizado..

Saludos.-.