CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
CoCreateInstance(CLSID_Shape, NULL, CLSCTX_INPROC_SERVER, IID_IShape, &pShape);
pShape->QueryInterface(IID_IDrawable, &pDraw);
pShape->GetArea(); pDraw->Draw();
pDraw->Release(); pDraw = NULL;
pShape->Release(); pShape = NULL;
CoUninitialize();