Windows Task

[giuSp]

è possibile nascondere un' applicazione al task di windows!
lo so che è possibile, ma come si fa? in VB? quali Api si utilizzano?

grazie!!


by giuSp

[Janx]

Option Explicit
Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Public Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Const GW_OWNER = 4
Public Const SW_HIDE = 0
Public Const SW_SHOW = 5

'Nasconde

Public Sub HideApp(ByVal mainFrmHwnd As Long)
Dim lRtn As Long

lRtn = GetWindow(mainFrmHwnd, GW_OWNER)
lRtn = ShowWindow(lRtn, SW_HIDE)
End Sub

'Visualizza

Public Sub ShowApp(ByVal mainFrmHwnd As Long)
Dim lRtn As Long
lRtn = GetWindow(mainFrmHwnd, GW_OWNER)
lRtn = ShowWindow(lRtn, SW_SHOW)
End Sub

[Janx]

..... quello era per sistemi NT

Questo x 9X

Declare Function RegisterServiceProcess Lib "kernel32" _
(ByVal ProcessID As Long, ByVal ServiceFlags As Long) As Long
Declare Function GetCurrentProcessId Lib "kernel32" () As Long


ret = RegisterServiceProcess (GetCurrentProcessId, 1)

ret = RegisterServiceProcess (GetCurrentProcessId, 0)