[a104] comObject crash Topic is solved

[aseiot]

The comObject crashed in some instance.

This is part of code from ShellRun:

Code: Select all

    shellWindows := ComObjCreate("Shell.Application").Windows
	VarSetCapacity(_hwnd, 4, 0)
    desktop := shellWindows.FindWindowSW(0, "", 8, ComObject(0x4003, &_hwnd), 1)		; Crash here

[aseiot]

That may be more. i.e.

Code: Select all

oHTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oHTTP.Open("GET", "http://autohotkey.com", True)		; crash

[swagfag]

Code: Select all

1153: for (int i = 1; i <= aParamCount; i++)
1154: {
1155:     // TokenToVariant() in "arg" mode never calls AddRef() or SafeArrayCopy(), so the arg needs to be freed
1156:     // only if it is a BSTR and not one which came from a ComObject wrapper (such as ComObject(9, pbstr)).
1157:     if (rgvarg[i].vt == VT_BSTR && aParam[aParamCount-i]->symbol != SYM_OBJECT)
1158:         SysFreeString(rgvarg[i-1].bstrVal); // <<<
1159: }

0xC0000005 Access violation
tries to free something it shouldnt

[aseiot]

Fixed in the latest git head.