¿Como hacer foco a otro componente de un TPageControl?

[burasu]

ya he encontado por que me falla. Uso el siguiente código:

begin
if Key = #13 then
begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end
end;

Que es para simular el movimiento del Tab con el Intro. Si no lo pongo y al form le pongo la variable KeyPreview a False, me funciona lo anterior pero no me funcionaria esto. Como lo podría hacer de una forma más autonoma que no sea poner setfocus en el keypress de cada boton???