To place a monitor into standby mode use WM_SYSCOMMAND message: procedure TForm1.Button1Click(Sender: TObject); begin SendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,2); end;