Mematikan Monitor Komputer

     Hai para "del-man", gmn kabarnya hari ini? Smoga baik-baik aja. Para "del-man" sekalian tentunya tau tentang Win API. Nah kali ini aku akan sedikit tentang cara mematikan monitor komputer menggunakan Delphi dan WIN API.
     Buat saja sebuah form seperti dibawah ini














Untuk listing tombol OK sebagai berikut :

var Mode:integer;
begin
   if cxRadioButton1.Checked = true then
     Mode:=1
   else
     Mode:=2;
   PostMessage(Handle,WM_SYSCOMMAND,SC_MONITORPOWER,Mode)
end;

     Cukup mudah bukan para "del-man". Selamat mencobanya. Jika para "del-man" merasa kesulitan, silahkan download aplikasi lengkapnya disini.