C-z でアイコン化させるには?

Title
C-z でアイコン化させるには?
Type
Tips
Section
その他
(require "wip/winapi")
(c:define-dll-entry winapi:BOOL ShowWindow (winapi:HWND c:int) "user32")

(global-set-key #\C-z #'(lambda () (interactive)
                          (ShowWindow (get-window-handle) 6)))