procedure TForm1.Button1Click(Sender: TObject);
begin
keybd_event(VK_LWIN, 0, 0 ,0);
keybd_event(byte('M'), 0, 0 ,0);
keybd_event(byte('M'), 0, KEYEVENTF_KEYUP ,0);
keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP,0);
end;//显示桌面
posted on 2009-02-05 02:51
小叶子 阅读(1823)
评论(0) 编辑 收藏 引用 所属分类:
笔记