Results 1 to 2 of 2

Thread: Hiding from Ctrl+alt+del menu

  1. #1

    Thread Starter
    Member
    Join Date
    Feb 2000
    Posts
    36

    Post

    Can somone explain - nice and simply without talking about other crap I don't care about (the other thread got a bit confusing).

    HOW!?

  2. #2
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527

    Post

    step 1:
    add a module
    put the following code into it:
    Code:
    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
    these are the subs to hide and show your program:
    Code:
    Public Sub HideProg()
    Dim pid As Long
    Dim reserv As Long
    
    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
    End Sub
    Public ShowProg()
    Dim pid As Long
    Dim reserv As Long
    
    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, _
    RSP_UNREGISTER_SERVICE)
    End Code
    HideProg, hides your program, and ShowProg shows it

    is that simple enough?

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width