- Код: Выделить всё
#COMPILE EXE
#INCLUDE "Win32API.inc"
FUNCTION PBMAIN
LOCAL hndl AS DWORD
hndl= FindHandleProcess("...")
MSGBOX STR$(hndl)
END FUNCTION
FUNCTION FindHandleProcess(wCaption AS STRING) AS LONG
DIM hwnd AS LONG
DIM pid AS LONG
DIM pHandle AS LONG
hwnd = FindWindow("", wCaption)
IF (hwnd = 0) THEN
FindHandleProcess = -1
EXIT FUNCTION
END IF
GetWindowThreadProcessId hwnd, pid
pHandle = OpenProcess(%PROCESS_ALL_ACCESS, %False, pid)
FUNCTION = pHandle
END FUNCTION
Error 480 in ...(39:035): Parameter mismatches definition
Line 39: hwnd = FindWindow("", wCaption)
Подскажите, что за ошибка, не могу понять