Como capturar o Clique da Tecla TAB - Urgente

Pessoal, alguem sabe como capturar o clique da tecla tab

Já tentei :

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift:TShiftState);
Begin
ShowMessage(´O nº da tecla: ´+Char(ORD(Key))+´ é => ´+IntToStr(key));
End;

mas não me retorna nada.............

ou

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState);
Begin
IF Key=VK_Tab Then ShowMessage(´Você apertou a tecla TAB´);
End;


o problema é que ele não estarta esse evento nem o Key Press.

Resumindo eu queria capturar essa tecla alguem sabe?

Antecipadamente agradeço
alessandro