Belajar Untuk Tidak Menjadi Bodoh


Disable, Enable Ctl-Alt-Delete and Alt-Tab, Ctl-Esc
Agustus 24, 2006, 6:26 am
Diarsipkan di bawah: Delphi

public
Enabled1: Integer;

procedure TForm1.Button1Click(Sender: TObject);
var
Dummy : integer;
begin
Dummy := 0;
if Enabled1 = 1 then
Enabled1 := 0
else
Enabled1 := 1;
SystemParametersInfo( SPI_SETFASTTASKSWITCH, Enabled1, @Dummy, 0);
{Disable CTRL-ALT-DEL}
SystemParametersInfo( SPI_SCREENSAVERRUNNING, Enabled1, @Dummy, 0);
end;

& Komentar

& Komentar sejauh ini
Tinggalkan komentar

cuma bisa di 95 ama 98 ya mas?
yang buat NT dong gimana caranya

Komentar oleh donie Oktober 2, 2006 @ 3:34 pm
Balas

makasih mas.
waduh itu link yang paling bawah saya ndak ngerti.
bukannya saya tidak menjadi bodoh tapi malah tambah bodoh liatnya.
pernah dapet source dari sapa gitu ya main hook hook an gitu, katanya sih berbahaya bisa sampek install ulang XP nya. makanya gak berani coba. capek re-install XP nya hehehe.

Komentar oleh donie Oktober 4, 2006 @ 9:10 pm
Balas


RSS umpan untuk komentar-komentar dalam tulisan ini. URI Lacak Balik


Tinggalkan komentar
Baris dan paragraf terpisah secara otomatis, alamat email tidak akan ditampilkan, kode HTML diperbolehkan: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <pre> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>