/******************************************************************************
* GetRecordInfoFromGuids [OLEAUT32.322]
*
* RETURNS
* Success: S_OK
* Failure: E_INVALIDARG, if any argument is invalid.
*/
HRESULT WINAPI GetRecordInfoFromGuids(REFGUID rGuidTypeLib, ULONG uVerMajor,
ULONG uVerMinor, LCID lcid, REFGUID rGuidTypeInfo, IRecordInfo** ppRecInfo)
{
ITypeInfo *pTypeInfo;
ITypeLib *pTypeLib;
HRESULT hres;
TRACE("(%p,%d,%d,%d,%p,%p)\n", rGuidTypeLib, uVerMajor, uVerMinor,
lcid, rGuidTypeInfo, ppRecInfo);
hres = LoadRegTypeLib(rGuidTypeLib, uVerMajor, uVerMinor, lcid, &pTypeLib);
if(FAILED(hres)) {
WARN("LoadRegTypeLib failed!\n");
return hres;
}
hres = ITypeLib_GetTypeInfoOfGuid(pTypeLib, rGuidTypeInfo, &pTypeInfo);
ITypeLib_Release(pTypeLib);
if(FAILED(hres)) {
WARN("GetTypeInfoOfGuid failed!\n");
return hres;
}
hres = GetRecordInfoFromTypeInfo(pTypeInfo, ppRecInfo);
ITypeInfo_Release(pTypeInfo);
return hres;
}
// @pymethod <o PyRecord>|pythoncom|GetRecordFromTypeInfo|Creates a new record object from a <o PyITypeInfo> interface
// @comm This function will fail if the specified type info does not have a guid defined
PyObject *pythoncom_GetRecordFromTypeInfo(PyObject *self, PyObject *args)
{
PyObject *obtypeinfo, *ret;
ITypeInfo *pITI=NULL;
IRecordInfo *pIRI=NULL;
HRESULT hr;
if (!PyArg_ParseTuple(args, "O:GetRecordFromTypeInfo",
&obtypeinfo)) // @pyparm <o PyITypeInfo>|TypeInfo||The type information to be converted into a PyRecord object
return NULL;
if (!PyCom_InterfaceFromPyInstanceOrObject(obtypeinfo, IID_ITypeInfo, (void **)&pITI, FALSE))
return NULL;
hr=GetRecordInfoFromTypeInfo(pITI, &pIRI);
if (FAILED(hr))
ret=PyCom_BuildPyException(hr);
else
ret = PyObject_FromRecordInfo(pIRI, NULL, 0);
pITI->Release();
if (pIRI!=NULL)
pIRI->Release();
return ret;
}
int PolylineTest::writePersistFile()
{
ComPtr<IPolyline> pl;
auto hr = CoCreateInstance(CLSID_PolylineObj, NULL, CLSCTX_INPROC_SERVER, IID_IPolyline, (void**)&pl);
if (FAILED(hr)) {
return -1;
}
LPTYPEINFO pTypeInfo = NULL;
LPTYPELIB pTypelib = NULL;
IRecordInfo* pRecInfo = NULL;
hr = LoadRegTypeLib(LIBID_GraphicsLibrary, 1, 0, GetUserDefaultLCID(), &pTypelib);
_ASSERT(SUCCEEDED(hr) && pTypelib);
hr = pTypelib->GetTypeInfoOfGuid(__uuidof(PolyPoint), &pTypeInfo);
_ASSERT(SUCCEEDED(hr) && pTypeInfo);
hr = GetRecordInfoFromTypeInfo(pTypeInfo, &pRecInfo);
_ASSERT(SUCCEEDED(hr) && pRecInfo);
pTypeInfo->Release();
pTypelib->Release();
std::vector<POINT> points = { { 1, 2 }, { 100, 200 }, { 300, 400 } };
auto psa = SafeArrayCreateVectorEx(VT_RECORD, 0, points.size(), pRecInfo);
PolyPoint* pps;
SafeArrayAccessData(psa, (void**)&pps);
_ASSERT(psa);
for (size_t i = 0; i < points.size(); ++i) {
pps[i].x = points[i].x;
pps[i].y = points[i].y;
}
pl->put_Points(psa);
outputPoints(pl);
ComPtr<IPersistFile> pf;
pl->QueryInterface(IID_IPersistFile, (void**)&pf);
pf->Save(kFileName, TRUE);
pf->SaveCompleted(kFileName);
return 0;
}
