Set monitor into standby mode

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;