Simular a Tecla TAB em uma aplicação Delphi

Visitando o fórum do www.clubedelphi.net, encontrei um tópico que achei interessante, que era simular o pressionamento da tecla TAB. Para fazer isso, é só colocar o codigo abaixo

keybd_event(VK_TAB, 0, 0, 0);
keybd_event(VK_TAB, 0, KEYEVENTF_KEYUP, 0);

Funciona que nem boca de bode.