Necesito hacerlo desde el Onclick de un Button.
 

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

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

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

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