Ejecutar Combinacion de teclas

[look]

Hola Amigos :) , me gustaria que me echaran una manita con lo siguiente :
tengo un boton en un form MDI, y lo que quiero es que al precionar el boton
ejecute la combinacion de teclas CTRL+F6, pero no se como hacerlo , espero me ayuden.


procedure TMain1.nextwbClick(Sender: TObject);
begin
////?? ejecutar conbinacion de teclas CTRL+F6
end;

[Khronos]

Con esto serviría:

begin
keybd_event(VK_CONTROL,0,0,0); //presionamos control
keybd_event(VK_F6,0,0,0); //presionamos F6
keybd_event(VK_F6,0,2,0); //levantamos F6
keybd_event(VK_CONTROL,0,2,0); //levantamos control
end;


Salu2

[look]

Con esto serviría:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)begin keybd_event(VK_CONTROL,0,0,0); //presionamos control
keybd_event(VK_F6,0,0,0); //presionamos F6
keybd_event(VK_F6,0,2,0); //levantamos F6
keybd_event(VK_CONTROL,0,2,0); //levantamos control
end;


Salu2

Pues Funciono muy bien Gracias Amigo Khronos...