1. Ana Sayfa
  2. Bilgisayar
  3. CTRL+ALT+Delete

CTRL+ALT+Delete

Son güncelleme: 28.09.2006 16:30
Sentinus Sentinus foto
  • Bu kod sayesinde kullanıcı CTRL+ALT+Delete tuşlarına
    bastığında formunuz çıkan listede gözükmeyecektir.

    1 Module açın

    '*****************
    'Module yazılacak kısım
    '*****************
    Public Declare Function GetCurrentProcessId _
    Lib "kernel32" () As Long
    Public Declare Function GetCurrentProcess _
    Lib "kernel32" () As Long
    Public Declare Function RegisterServiceProcess _
    Lib "kernel32" (ByVal dwProcessID As Long, _
    ByVal dwType As Long) As Long

    Public Const RSP_SIMPLE_SERVICE = 1
    Public Const RSP_UNREGISTER_SERVICE = 0



    Public Sub show()
    Dim p As Long
    Dim r As Long
    p = GetCurrentProcessId()
    regserv = RegisterServiceProcess(p, RSP_SIMPLE_SERVICE)
    End Sub


    Public Sub hide()
    Dim p As Long
    Dim r As Long
    p = GetCurrentProcessId()
    regserv = RegisterServiceProcess(p, _
    RSP_UNREGISTER_SERVICE)
    End Sub

    'Module Yazılacak kısım bitti


    'Formun Load bölümüne yazılacak kısım

    hide

    'Formun Load bölümüne yazılacak kısım bitti

    '(Not : NT4.0 veya windows 2000'de çalışmaz)
#27.10.2005 07:08 0 0 0
cetin_bezirgan cetin_bezirgan foto
  • Bilgin için teşekkür ederim arkadaşım.Bi deniyim böle değişik şeylere meraklıyımdır ben !!!!!!!!

#31.10.2005 14:55 0 0 0
tgunes_mail tgunes_mail foto
  • saol tşkler
#11.11.2005 15:15 0 0 0
keto_41 keto_41 foto
  • BiLGiLeR iCiN TeSSeKüR eDeRiM arKaDaSiM
#05.12.2005 21:18 0 0 0
SU-PERISI SU-PERISI foto
  • paylaşım için teşekkürler
#06.12.2005 17:40 0 0 0
sonersnr sonersnr foto
  • allah razı olsun
#09.02.2006 17:48 0 0 0
Halil_63 Halil_63 foto
  • allah senden pır mersi ama bu hangi program için?????
    konuları ayrı başlık altında toplarlarsa iyi olur bence
#22.03.2006 21:35 0 0 0
fiber_optic fiber_optic foto
  • tamam da hangi programlama dilinde yazacağız bari onu belirtseydin usta

    Teşekkürler ellerin esağlık
#28.09.2006 16:30 0 0 0