//KapatSendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1);//AƧSendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1);