#Include Once "windows.bi"
Dim SInfo As STARTUPINFO
Dim PInfo As PROCESS_INFORMATION
CreateProcess "test.exe", NULL, NULL, NULL, NULL, NORMAL_PRIORITY_CLASS, NULL, NULL, SInfo, PInfo
Type mismatch при вызове CreateProcess (FreeBASIC)
Здравствуйте, уважаемые форумчане. Вот возникла проблема, над которой бьюсь уже целый день. Есть код FreeBASIC'a:
На последних двух параметрах выдает Type mismatch. Пробовал описывать эти типы вручную, объявлял функцию вручную - все бестолку. Когда объявляешь эти две переменные как Long (DWORD), выдает предупреждение "Passing scalar as pointer", но компилится и запускается, вываливаясь со стандартной ошибкой винды. В FASM'е тот же самый код выполняется на ура:
Никак не пойму, в чем дело. Помогите, пожалуйста :)
Код:
На последних двух параметрах выдает Type mismatch. Пробовал описывать эти типы вручную, объявлял функцию вручную - все бестолку. Когда объявляешь эти две переменные как Long (DWORD), выдает предупреждение "Passing scalar as pointer", но компилится и запускается, вываливаясь со стандартной ошибкой винды. В FASM'е тот же самый код выполняется на ура:
Код:
Format PE
include 'win32ax.inc'
.data
SInfo STARTUPINFO
PInfo PROCESS_INFORMATION
.code
start:
invoke CreateProcess, "text.exe", 0, 0, 0, 0, NORMAL_PRIORITY_CLASS, 0, 0, SInfo, PInfo
invoke ExitProcess, 0
.end start
include 'win32ax.inc'
.data
SInfo STARTUPINFO
PInfo PROCESS_INFORMATION
.code
start:
invoke CreateProcess, "text.exe", 0, 0, 0, 0, NORMAL_PRIORITY_CLASS, 0, 0, SInfo, PInfo
invoke ExitProcess, 0
.end start
Никак не пойму, в чем дело. Помогите, пожалуйста :)
CreateProcess "test.exe", NULL, NULL, NULL, NULL, NORMAL_PRIORITY_CLASS, NULL, NULL, @SInfo, @PInfo
Огромное спасибо! :)