API-Guide писал(а):
- Код: Выделить всё
Private Declare Function GetCurrentThread Lib "kernel32" () As Long
Private Declare Sub ExitThread Lib "kernel32" (ByVal dwExitCode As Long)
Private Declare Function GetExitCodeThread Lib "kernel32" (ByVal hThread As Long, lpExitCode As Long) As Long
Private Sub Form_Load()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
'Exit this thread
ExitThread GetExitCodeThread(GetCurrentThread, 0)
End Sub
На мой взгляд, тут наблюдается совершенно бессмысленный вызов GetExitCodeThread, при живом то потоке
Так кто же не прав, я или API-Guide?