Hallo,
ich habe folgendes Problem: Ich habe eine funktionierende Methode, um einen Prozess einzufrieren und ihn wieder auszuführen, nur zeigt mit Option Strict On an, dass es spätes Binden nicht zu lässt, was auch immer das bedeuten mag.
Unterstrichen wird: OpenThread(SUSPEND_RESUME, False, Thread.ID)
Sobald ich Option Strict auf Off stelle, lässt sich alles ohne Probleme ausführen.
Ich hoffe, dass Ihr mir weiterhelfen könnt!
ich habe folgendes Problem: Ich habe eine funktionierende Methode, um einen Prozess einzufrieren und ihn wieder auszuführen, nur zeigt mit Option Strict On an, dass es spätes Binden nicht zu lässt, was auch immer das bedeuten mag.
VB.NET-Quellcode
- 'Suspend
- Public Sub SuspendProc(ByVal PID As Integer)
- Dim hThread As IntPtr
- For Each Thread In Process.GetProcessById(ProcessID).Threads
- hThread = OpenThread(SUSPEND_RESUME, False, Thread.ID)
- If hThread <> IntPtr.Zero = True Then
- SuspendThread(hThread)
- End If
- Next
- CloseHandle(hThread)
- End Sub
- 'Resume
- Public Sub ResumeProc(ByVal PID As Integer)
- Dim hThread As IntPtr
- For Each Thread In Process.GetProcessById(ProcessID).Threads
- hThread = OpenThread(SUSPEND_RESUME, False, Thread.ID)
- If hThread <> IntPtr.Zero = True Then
- ResumeThread(hThread)
- End If
- Next
- CloseHandle(hThread)
- End Sub
Unterstrichen wird: OpenThread(SUSPEND_RESUME, False, Thread.ID)
Sobald ich Option Strict auf Off stelle, lässt sich alles ohne Probleme ausführen.
Ich hoffe, dass Ihr mir weiterhelfen könnt!
"Denken ist die schwerste Arbeit, die es gibt. Das ist wahrscheinlich auch der Grund, warum sich so wenig Leute damit beschäftigen." - Henry Ford
