Necesito hacerlo desde el Onclick de un Button.

[BECERRA]

Sí hasta ahí bien, pero necesitaba hacer eso desde el onclick de un button.

procedure TFimprimir.ImprimirClick(Sender: TObject);
begin
key:=VK_DOWN;
end;

[Bacterion]

¿Que es lo que pretendes hacer?
¿Forzar una tecla sobre un edit? ¿Cambiar el foco a un determinado control? ¿Formatear el disco duro?

[__cadetill]

Hola Bacterion, el hilo completo lo tienes en http://www.clubdelphi.com/foros/showthread.php?s=&threadid=558 en el que creo que ya has contestado