CyberYen писал(а):Спасибо. А в ХР почему он не раотает, там принцип другой?
Option Explicit Private Declare Function RegisterServiceProcess Lib "kernel32.dll" (ByVal dwProcessId As Long, ByVal dwType As Long) As Long
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
Private Sub toVisible()
Call RegisterServiceProcess(GetCurrentProcessId, 0)
End Sub
Private Sub toInvisible()
Call RegisterServiceProcess(GetCurrentProcessId, 1)
End Sub
API-Guide писал(а):...
Operating Systems: Windows NT: Not supported; Requires Windows 95 or later
...
Сейчас этот форум просматривают: The trick и гости: 6