delphi 关闭显示器


{关闭显示器}

SendMessage(FindWindow(nil,nil), WM_SYSCOMMAND, SC_MONITORPOWER, 1);
//关闭显示器 根据MSDN,这个参数如果是1,则 表示显示器处于低能耗状态。


{打开显示器}

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);


联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678