Hari ini Tutorial kita lanjut lagi, terkadang kita pingin iseng atau mengerjain temen kita yang biasanya suka iseng ama kita, sekarang kita yang bikin iseng dengan mendisabled menu close program kita atau project dari temen kita. ok langsung saja tutorial ini saya kasih tau ke anda semua.
Contoh jadi seperti ini :
Ini script yang harus kalian ketik atau langsung Copas aja deh biar gag capek .. .
#
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var
hMenuHandle : HMENU;
begin
hMenuHandle := GetSystemMenu(Form1.Handle, FALSE);
if (hMenuHandle <> 0) then DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;
end.
Ok selesai.
Seperti sebelumnya jika ada request atau pertanyaan silahkan layangkan pesan ajah. OK
Wassalam .
By. Effand Bocah Nozh
