si lo que quieres es minimizar todo y sacar el escritorio la combinación es "ventanita + D" (no tienes que programar nada, simplemente dile al usuario como se hace)
Si lo que quieres es que al darle a un bitbutton se minimize todo puedes simular que el usuario ha apretado esas teclas:
Código Delphi
[-]
keybd_event(VK_LWIN,MapvirtualKey( VK_LWIN,0),0,0) ;
keybd_event(Ord('D'),MapvirtualKey(Ord('D'),0),0,0);
keybd_event(Ord('D'),MapvirtualKey(Ord('D'),0),KEYEVENTF_KEYUP,0);
keybd_event(VK_LWIN,MapvirtualKey(VK_LWIN,0),KEYEVENTF_KEYUP,0);
Esto lo usaba yo para sacar el escritorio cada vez que minimizaban un form modal, enganchando con el evento OnMinimize