CATIA Automation编程初探

最近开始对 CATIA 进行一些自动化的开发，本来想找 CAA 来进行研究，可惜一直没时间和机会去找，暂时就利用 CATIA Automation 来开发了。

由于利用 VB 或 VB.NET 将CATIA 脚本转化为程序确实方便，不过利用C++来操作更适合于我这种开发者。

方法有好多种，这里以画圆作为一个简单例子。

1 利用 IDispatch 接口来编程

[cpp] view plaincopyprint?

1. HRESULThr;
2. CLSIDAppClsid;
3. IDispatch*pApp;
5. ::CoInitialize(NULL);
7. //
8. ::CLSIDFromProgID(L"CATIA.Application",&AppClsid);//gettheuniqueidofCATIA
11. //
12. hr=CoCreateInstance(AppClsid,NULL,CLSCTX_LOCAL_SERVER,IID_IDispatch,(void**)&pApp);
15. VARIANTresult,buffer;
16. VariantInit(&result);
19. VARIANTarg2;
20. VariantInit(&arg2);
21. arg2.vt=VT_BOOL;
22. arg2.boolVal=TRUE;
23. hr=AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD,&result,pApp,L"Visible",1,arg2);
26. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,pApp,L"Documents",0);//herethereisnoargument,soweput0
27. buffer.vt=VT_DISPATCH;
28. buffer.pdispVal=result.pdispVal;
29. IDispatch*documents=buffer.pdispVal;
31. VARIANTarg1;
32. VariantInit(&arg1);
33. arg1.vt=VT_BSTR;
34. arg1.bstrVal=::SysAllocString(L"Part");
35. //VARIANTresult,buffer;
36. VariantInit(&result);
37. hr=AutoWrap(DISPATCH_METHOD,&result,documents,L"Add",1,arg1);
39. buffer.vt=VT_DISPATCH;
40. buffer.pdispVal=result.pdispVal;
41. IDispatch*partDocument=buffer.pdispVal;
43. //
44. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,partDocument,L"Part",0);
45. buffer.vt=VT_DISPATCH;
46. buffer.pdispVal=result.pdispVal;
47. IDispatch*part=buffer.pdispVal;
49. //
50. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"Bodies",0);
51. buffer.vt=VT_DISPATCH;
52. buffer.pdispVal=result.pdispVal;
53. IDispatch*bodies=buffer.pdispVal;
55. //
56. VARIANTarg;
57. VariantInit(&arg);
58. arg.vt=VT_BSTR;
59. arg.bstrVal=::SysAllocString(L"PartBody");
60. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,bodies,L"Item",1,arg);
61. buffer.vt=VT_DISPATCH;
62. buffer.pdispVal=result.pdispVal;
63. IDispatch*body=buffer.pdispVal;
65. //
66. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,body,L"Sketches",0);
67. buffer.vt=VT_DISPATCH;
68. buffer.pdispVal=result.pdispVal;
69. IDispatch*sketches1=buffer.pdispVal;
71. //
72. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"OriginElements",0);
73. buffer.vt=VT_DISPATCH;
74. buffer.pdispVal=result.pdispVal;
75. IDispatch*originElements=buffer.pdispVal;
77. //
78. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,originElements,L"PlaneXY",0);
79. buffer.vt=VT_DISPATCH;
80. buffer.pdispVal=result.pdispVal;
81. IDispatch*reference1=buffer.pdispVal;
83. //
84. VARIANTarg3;
85. VariantInit(&arg3);
86. arg3.vt=VT_DISPATCH;
87. arg3.pdispVal=reference1;
88. hr=AutoWrap(DISPATCH_METHOD,&result,sketches1,L"Add",1,arg3);
89. buffer.vt=VT_DISPATCH;
90. buffer.pdispVal=result.pdispVal;
91. IDispatch*sketch1=buffer.pdispVal;
93. ////
94. //SAFEARRAY*psa;
95. //SAFEARRAYBOUNDrgsabound[1];
97. //rgsabound[0].lLbound=0;
98. //rgsabound[0].cElements=9;
100. //psa=SafeArrayCreate(VT_VARIANT,1,rgsabound);
101. //
104. //hr=SafeArrayAccessData(psa);
107. //hr=SafeArrayUnaccessData(psa);
109. //VARIANTarray;
110. //VariantInit(&array);
111. //array.vt=VT_ARRAY;
112. //array.pparray=&psa;
113. //
114. //hr=AutoWrap(DISPATCH_METHOD,&result,sketch1,L"SetAbsoluteAxisData",1,array);
115. VARIANTarg4;
116. VariantInit(&arg4);
117. arg4.vt=VT_DISPATCH;
118. arg4.pdispVal=sketch1;
119. hr=AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD,&result,part,L"InWorkObject",1,arg4);
120. //buffer.vt=VT_DISPATCH;
121. //buffer.pdispVal=result.pdispVal;
122. //IDispatch*sketch1=buffer.pdispVal;
124. //
125. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,sketch1,L"OpenEdition",0);
126. buffer.vt=VT_DISPATCH;
127. buffer.pdispVal=result.pdispVal;
128. IDispatch*factory2D1=buffer.pdispVal;
131. //
132. VARIANTa1,a2,a3;
133. VariantInit(&a1);
134. VariantInit(&a2);
135. VariantInit(&a3);
136. a1.vt=VT_R4;a1.fltVal=50.f;
137. a2.vt=VT_R4;a2.fltVal=0.f;
138. a3.vt=VT_R4;a3.fltVal=0.f;
139. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,factory2D1,L"CreateClosedCircle",3,a1,a2,a3);
141. //
142. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,sketch1,L"CloseEdition",0);
144. //
145. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"Update",0);
148. if(pApp)pApp->Release();
149. ::CoUninitialize();

        HRESULT hr;        CLSID AppClsid;        IDispatch *pApp;         ::CoInitialize(NULL);        	//	::CLSIDFromProgID (L"CATIA.Application", &AppClsid); //get the unique id of CATIA        			//	hr = CoCreateInstance(AppClsid,NULL,CLSCTX_LOCAL_SERVER, IID_IDispatch, (void**)&pApp);          VARIANT result, buffer;        VariantInit(&result);          VARIANT arg2;        VariantInit(&arg2);        arg2.vt = VT_BOOL;        arg2.boolVal = TRUE;        hr = AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD, &result, pApp, L"Visible", 1, arg2);          hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, pApp, L"Documents", 0);//here there is no argument, so we put 0        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *documents = buffer.pdispVal;         VARIANT arg1;        VariantInit(&arg1);        arg1.vt = VT_BSTR;        arg1.bstrVal = ::SysAllocString(L"Part");        //VARIANT result, buffer;        VariantInit(&result);        hr = AutoWrap(DISPATCH_METHOD, &result, documents, L"Add", 1 , arg1);         buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *partDocument = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, partDocument, L"Part", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *part = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"Bodies", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *bodies = buffer.pdispVal;         //        VARIANT arg;        VariantInit(&arg);        arg.vt = VT_BSTR;        arg.bstrVal = ::SysAllocString(L"PartBody");        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, bodies, L"Item", 1, arg);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *body = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, body, L"Sketches", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *sketches1 = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"OriginElements", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *originElements = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, originElements, L"PlaneXY", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *reference1 = buffer.pdispVal;         //        VARIANT arg3;        VariantInit(&arg3);        arg3.vt = VT_DISPATCH;        arg3.pdispVal = reference1;        hr = AutoWrap(DISPATCH_METHOD, &result, sketches1, L"Add", 1, arg3);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *sketch1 = buffer.pdispVal;         ////        //SAFEARRAY * psa;        //SAFEARRAYBOUND rgsabound[1];         //rgsabound[0].lLbound = 0;        //rgsabound[0].cElements = 9;         //psa = SafeArrayCreate(VT_VARIANT, 1, rgsabound);        //          //hr = SafeArrayAccessData(psa);          //hr = SafeArrayUnaccessData(psa);         //VARIANT array;        //VariantInit(&array);        //array.vt = VT_ARRAY;        //array.pparray = &psa;        //        //hr = AutoWrap(DISPATCH_METHOD, &result, sketch1, L"SetAbsoluteAxisData", 1, array);        VARIANT arg4;        VariantInit(&arg4);        arg4.vt = VT_DISPATCH;        arg4.pdispVal = sketch1;        hr = AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD, &result, part, L"InWorkObject", 1, arg4);        //buffer.vt = VT_DISPATCH;        //buffer.pdispVal = result.pdispVal;        //IDispatch *sketch1 = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, sketch1, L"OpenEdition", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *factory2D1 = buffer.pdispVal;          //        VARIANT a1, a2, a3;        VariantInit(&a1);        VariantInit(&a2);        VariantInit(&a3);        a1.vt = VT_R4;a1.fltVal = 50.f;        a2.vt = VT_R4;a2.fltVal = 0.f;        a3.vt = VT_R4;a3.fltVal = 0.f;        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, factory2D1, L"CreateClosedCircle", 3, a1, a2, a3);		        //	hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, sketch1, L"CloseEdition", 0);			//	hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"Update", 0);		        if (pApp) pApp->Release();       ::CoUninitialize();

2 利用CATIA自带的TLB转化成 tlh/tli 来编程

先用VC的 #import 功能进行转化，主要的几个 TLB 为：

InfTypeLib.tlb

KweTypeLib.tlb

PSTypeLib.tlb

MecModTypeLib.tlb

CATGitTypeLib.tlb

试验的 CATIA V5 R18 版本在转换之后有些小错误，之后就可以方便地写代码了。VC6的话，需要把转换后的UTF8编码文件转换成ANSI。

[cpp] view plaincopyprint?

1. intmain(intargc,char*argv[])
2. {
3. ::CoInitialize(NULL);
5. ApplicationPtrcatia;
7. HRESULThr=S_OK;
9. hr=catia.GetActiveObject("CATIA.Application");
11. if(FAILED(hr))
12. {
13. hr=catia.CreateInstance("CATIA.Application");
14. }
16. catia->PutVisible(VARIANT_TRUE);
18. //
19. DocumentsPtrdocuments;
20. documents=catia->GetDocuments();
21. BSTRAddPart=_com_util::ConvertStringToBSTR("Part");
22. PartDocumentPtrpartDocument;
23. partDocument=documents->Add(&AddPart);
25. PartPtrpart=partDocument->GetPart();
26. BodiesPtrbodies=part->GetBodies();
27. BodyPtrbody=part->GetMainBody();
28. HybridBodiesPtrhybridBodies=part->GetHybridBodies();
30. FactoryPtrshapeFactory=part->GetShapeFactory();
32. HybridShapeFactoryPtrhybridShapeFactory=part->GetHybridShapeFactory();
34. SketchesPtrsketches=body->GetSketches();
36. OriginElementsPtroriginElements=part->GetOriginElements();
38. AnyObjectPtrplaneXY=originElements->GetPlaneXY();
40. ReferencePtrr1=part->CreateReferenceFromObject(planeXY);
42. SketchPtrsketch=sketches->Add(r1);
44. part->PutInWorkObject(sketch);
46. Factory2DPtrfactory2D=sketch->OpenEdition();
48. factory2D->CreateClosedCircle(0.0,0.0,50.0);
50. sketch->CloseEdition();
52. part->Update();
54. ::CoUninitialize();
56. return0;
57. }

int main(int argc, char* argv[]){    ::CoInitialize(NULL);     ApplicationPtr catia;     HRESULT hr = S_OK;     hr = catia.GetActiveObject("CATIA.Application");     if (FAILED(hr))    {        hr = catia.CreateInstance("CATIA.Application");    }     catia->PutVisible(VARIANT_TRUE);     //    DocumentsPtr documents;    documents = catia->GetDocuments();    BSTR AddPart = _com_util::ConvertStringToBSTR("Part");    PartDocumentPtr partDocument;    partDocument = documents->Add(&AddPart);     PartPtr part = partDocument->GetPart();     BodiesPtr bodies = part->GetBodies();     BodyPtr body = part->GetMainBody();     HybridBodiesPtr hybridBodies = part->GetHybridBodies();     FactoryPtr shapeFactory = part->GetShapeFactory();      HybridShapeFactoryPtr hybridShapeFactory = part->GetHybridShapeFactory();     SketchesPtr sketches = body->GetSketches();     OriginElementsPtr originElements = part->GetOriginElements();     AnyObjectPtr planeXY = originElements->GetPlaneXY();     ReferencePtr r1 = part->CreateReferenceFromObject(planeXY);     SketchPtr sketch = sketches->Add(r1);     part->PutInWorkObject(sketch);     Factory2DPtr factory2D = sketch->OpenEdition();     factory2D->CreateClosedCircle(0.0, 0.0, 50.0);     sketch->CloseEdition();     part->Update();     ::CoUninitialize();     return 0;}

3 利用 CAA

还没有找到CAA安装程序，以后再续

最近开始对 CATIA 进行一些自动化的开发，本来想找 CAA 来进行研究，可惜一直没时间和机会去找，暂时就利用 CATIA Automation 来开发了。

由于利用 VB 或 VB.NET 将CATIA 脚本 转化为程序确实方便，不过利用C++来操作更适合于我这种开发者。

方法有好多种，这里以画圆作为一个简单例子。

1 利用 IDispatch 接口来编程

[cpp] view plaincopyprint?

1. HRESULThr;
2. CLSIDAppClsid;
3. IDispatch*pApp;
5. ::CoInitialize(NULL);
7. //
8. ::CLSIDFromProgID(L"CATIA.Application",&AppClsid);//gettheuniqueidofCATIA
11. //
12. hr=CoCreateInstance(AppClsid,NULL,CLSCTX_LOCAL_SERVER,IID_IDispatch,(void**)&pApp);
15. VARIANTresult,buffer;
16. VariantInit(&result);
19. VARIANTarg2;
20. VariantInit(&arg2);
21. arg2.vt=VT_BOOL;
22. arg2.boolVal=TRUE;
23. hr=AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD,&result,pApp,L"Visible",1,arg2);
26. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,pApp,L"Documents",0);//herethereisnoargument,soweput0
27. buffer.vt=VT_DISPATCH;
28. buffer.pdispVal=result.pdispVal;
29. IDispatch*documents=buffer.pdispVal;
31. VARIANTarg1;
32. VariantInit(&arg1);
33. arg1.vt=VT_BSTR;
34. arg1.bstrVal=::SysAllocString(L"Part");
35. //VARIANTresult,buffer;
36. VariantInit(&result);
37. hr=AutoWrap(DISPATCH_METHOD,&result,documents,L"Add",1,arg1);
39. buffer.vt=VT_DISPATCH;
40. buffer.pdispVal=result.pdispVal;
41. IDispatch*partDocument=buffer.pdispVal;
43. //
44. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,partDocument,L"Part",0);
45. buffer.vt=VT_DISPATCH;
46. buffer.pdispVal=result.pdispVal;
47. IDispatch*part=buffer.pdispVal;
49. //
50. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"Bodies",0);
51. buffer.vt=VT_DISPATCH;
52. buffer.pdispVal=result.pdispVal;
53. IDispatch*bodies=buffer.pdispVal;
55. //
56. VARIANTarg;
57. VariantInit(&arg);
58. arg.vt=VT_BSTR;
59. arg.bstrVal=::SysAllocString(L"PartBody");
60. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,bodies,L"Item",1,arg);
61. buffer.vt=VT_DISPATCH;
62. buffer.pdispVal=result.pdispVal;
63. IDispatch*body=buffer.pdispVal;
65. //
66. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,body,L"Sketches",0);
67. buffer.vt=VT_DISPATCH;
68. buffer.pdispVal=result.pdispVal;
69. IDispatch*sketches1=buffer.pdispVal;
71. //
72. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"OriginElements",0);
73. buffer.vt=VT_DISPATCH;
74. buffer.pdispVal=result.pdispVal;
75. IDispatch*originElements=buffer.pdispVal;
77. //
78. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,originElements,L"PlaneXY",0);
79. buffer.vt=VT_DISPATCH;
80. buffer.pdispVal=result.pdispVal;
81. IDispatch*reference1=buffer.pdispVal;
83. //
84. VARIANTarg3;
85. VariantInit(&arg3);
86. arg3.vt=VT_DISPATCH;
87. arg3.pdispVal=reference1;
88. hr=AutoWrap(DISPATCH_METHOD,&result,sketches1,L"Add",1,arg3);
89. buffer.vt=VT_DISPATCH;
90. buffer.pdispVal=result.pdispVal;
91. IDispatch*sketch1=buffer.pdispVal;
93. ////
94. //SAFEARRAY*psa;
95. //SAFEARRAYBOUNDrgsabound[1];
97. //rgsabound[0].lLbound=0;
98. //rgsabound[0].cElements=9;
100. //psa=SafeArrayCreate(VT_VARIANT,1,rgsabound);
101. //
104. //hr=SafeArrayAccessData(psa);
107. //hr=SafeArrayUnaccessData(psa);
109. //VARIANTarray;
110. //VariantInit(&array);
111. //array.vt=VT_ARRAY;
112. //array.pparray=&psa;
113. //
114. //hr=AutoWrap(DISPATCH_METHOD,&result,sketch1,L"SetAbsoluteAxisData",1,array);
115. VARIANTarg4;
116. VariantInit(&arg4);
117. arg4.vt=VT_DISPATCH;
118. arg4.pdispVal=sketch1;
119. hr=AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD,&result,part,L"InWorkObject",1,arg4);
120. //buffer.vt=VT_DISPATCH;
121. //buffer.pdispVal=result.pdispVal;
122. //IDispatch*sketch1=buffer.pdispVal;
124. //
125. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,sketch1,L"OpenEdition",0);
126. buffer.vt=VT_DISPATCH;
127. buffer.pdispVal=result.pdispVal;
128. IDispatch*factory2D1=buffer.pdispVal;
131. //
132. VARIANTa1,a2,a3;
133. VariantInit(&a1);
134. VariantInit(&a2);
135. VariantInit(&a3);
136. a1.vt=VT_R4;a1.fltVal=50.f;
137. a2.vt=VT_R4;a2.fltVal=0.f;
138. a3.vt=VT_R4;a3.fltVal=0.f;
139. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,factory2D1,L"CreateClosedCircle",3,a1,a2,a3);
141. //
142. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,sketch1,L"CloseEdition",0);
144. //
145. hr=AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD,&result,part,L"Update",0);
148. if(pApp)pApp->Release();
149. ::CoUninitialize();

        HRESULT hr;        CLSID AppClsid;        IDispatch *pApp;         ::CoInitialize(NULL);        	//	::CLSIDFromProgID (L"CATIA.Application", &AppClsid); //get the unique id of CATIA        			//	hr = CoCreateInstance(AppClsid,NULL,CLSCTX_LOCAL_SERVER, IID_IDispatch, (void**)&pApp);          VARIANT result, buffer;        VariantInit(&result);          VARIANT arg2;        VariantInit(&arg2);        arg2.vt = VT_BOOL;        arg2.boolVal = TRUE;        hr = AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD, &result, pApp, L"Visible", 1, arg2);          hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, pApp, L"Documents", 0);//here there is no argument, so we put 0        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *documents = buffer.pdispVal;         VARIANT arg1;        VariantInit(&arg1);        arg1.vt = VT_BSTR;        arg1.bstrVal = ::SysAllocString(L"Part");        //VARIANT result, buffer;        VariantInit(&result);        hr = AutoWrap(DISPATCH_METHOD, &result, documents, L"Add", 1 , arg1);         buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *partDocument = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, partDocument, L"Part", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *part = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"Bodies", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *bodies = buffer.pdispVal;         //        VARIANT arg;        VariantInit(&arg);        arg.vt = VT_BSTR;        arg.bstrVal = ::SysAllocString(L"PartBody");        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, bodies, L"Item", 1, arg);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *body = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, body, L"Sketches", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *sketches1 = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"OriginElements", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *originElements = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, originElements, L"PlaneXY", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *reference1 = buffer.pdispVal;         //        VARIANT arg3;        VariantInit(&arg3);        arg3.vt = VT_DISPATCH;        arg3.pdispVal = reference1;        hr = AutoWrap(DISPATCH_METHOD, &result, sketches1, L"Add", 1, arg3);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *sketch1 = buffer.pdispVal;         ////        //SAFEARRAY * psa;        //SAFEARRAYBOUND rgsabound[1];         //rgsabound[0].lLbound = 0;        //rgsabound[0].cElements = 9;         //psa = SafeArrayCreate(VT_VARIANT, 1, rgsabound);        //          //hr = SafeArrayAccessData(psa);          //hr = SafeArrayUnaccessData(psa);         //VARIANT array;        //VariantInit(&array);        //array.vt = VT_ARRAY;        //array.pparray = &psa;        //        //hr = AutoWrap(DISPATCH_METHOD, &result, sketch1, L"SetAbsoluteAxisData", 1, array);        VARIANT arg4;        VariantInit(&arg4);        arg4.vt = VT_DISPATCH;        arg4.pdispVal = sketch1;        hr = AutoWrap(DISPATCH_PROPERTYPUT|DISPATCH_METHOD, &result, part, L"InWorkObject", 1, arg4);        //buffer.vt = VT_DISPATCH;        //buffer.pdispVal = result.pdispVal;        //IDispatch *sketch1 = buffer.pdispVal;         //        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, sketch1, L"OpenEdition", 0);        buffer.vt = VT_DISPATCH;        buffer.pdispVal = result.pdispVal;        IDispatch *factory2D1 = buffer.pdispVal;          //        VARIANT a1, a2, a3;        VariantInit(&a1);        VariantInit(&a2);        VariantInit(&a3);        a1.vt = VT_R4;a1.fltVal = 50.f;        a2.vt = VT_R4;a2.fltVal = 0.f;        a3.vt = VT_R4;a3.fltVal = 0.f;        hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, factory2D1, L"CreateClosedCircle", 3, a1, a2, a3);		        //	hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, sketch1, L"CloseEdition", 0);			//	hr = AutoWrap(DISPATCH_PROPERTYGET|DISPATCH_METHOD, &result, part, L"Update", 0);		        if (pApp) pApp->Release();       ::CoUninitialize();

2 利用CATIA自带的TLB转化成 tlh/tli 来编程

先用VC的 #import 功能进行转化，主要的几个 TLB 为：

InfTypeLib.tlb

KweTypeLib.tlb

PSTypeLib.tlb

MecModTypeLib.tlb

CATGitTypeLib.tlb

试验的 CATIA V5 R18 版本在 转换 之后有些小错误，之后就可以方便地写代码了。VC6的话，需要把转换后的UTF8编码文件转换成ANSI。

[cpp] view plaincopyprint?

1. intmain(intargc,char*argv[])
2. {
3. ::CoInitialize(NULL);
5. ApplicationPtrcatia;
7. HRESULThr=S_OK;
9. hr=catia.GetActiveObject("CATIA.Application");
11. if(FAILED(hr))
12. {
13. hr=catia.CreateInstance("CATIA.Application");
14. }
16. catia->PutVisible(VARIANT_TRUE);
18. //
19. DocumentsPtrdocuments;
20. documents=catia->GetDocuments();
21. BSTRAddPart=_com_util::ConvertStringToBSTR("Part");
22. PartDocumentPtrpartDocument;
23. partDocument=documents->Add(&AddPart);
25. PartPtrpart=partDocument->GetPart();
26. BodiesPtrbodies=part->GetBodies();
27. BodyPtrbody=part->GetMainBody();
28. HybridBodiesPtrhybridBodies=part->GetHybridBodies();
30. FactoryPtrshapeFactory=part->GetShapeFactory();
32. HybridShapeFactoryPtrhybridShapeFactory=part->GetHybridShapeFactory();
34. SketchesPtrsketches=body->GetSketches();
36. OriginElementsPtroriginElements=part->GetOriginElements();
38. AnyObjectPtrplaneXY=originElements->GetPlaneXY();
40. ReferencePtrr1=part->CreateReferenceFromObject(planeXY);
42. SketchPtrsketch=sketches->Add(r1);
44. part->PutInWorkObject(sketch);
46. Factory2DPtrfactory2D=sketch->OpenEdition();
48. factory2D->CreateClosedCircle(0.0,0.0,50.0);
50. sketch->CloseEdition();
52. part->Update();
54. ::CoUninitialize();
56. return0;
57. }

int main(int argc, char* argv[]){    ::CoInitialize(NULL);     ApplicationPtr catia;     HRESULT hr = S_OK;     hr = catia.GetActiveObject("CATIA.Application");     if (FAILED(hr))    {        hr = catia.CreateInstance("CATIA.Application");    }     catia->PutVisible(VARIANT_TRUE);     //    DocumentsPtr documents;    documents = catia->GetDocuments();    BSTR AddPart = _com_util::ConvertStringToBSTR("Part");    PartDocumentPtr partDocument;    partDocument = documents->Add(&AddPart);     PartPtr part = partDocument->GetPart();     BodiesPtr bodies = part->GetBodies();     BodyPtr body = part->GetMainBody();     HybridBodiesPtr hybridBodies = part->GetHybridBodies();     FactoryPtr shapeFactory = part->GetShapeFactory();      HybridShapeFactoryPtr hybridShapeFactory = part->GetHybridShapeFactory();     SketchesPtr sketches = body->GetSketches();     OriginElementsPtr originElements = part->GetOriginElements();     AnyObjectPtr planeXY = originElements->GetPlaneXY();     ReferencePtr r1 = part->CreateReferenceFromObject(planeXY);     SketchPtr sketch = sketches->Add(r1);     part->PutInWorkObject(sketch);     Factory2DPtr factory2D = sketch->OpenEdition();     factory2D->CreateClosedCircle(0.0, 0.0, 50.0);     sketch->CloseEdition();     part->Update();     ::CoUninitialize();     return 0;}

3 利用 CAA

还没有找到CAA安装程序，以后再续

 相关资源： CATIA V5 Automation 教程
免责声明：本文系网络转载或改编，未找到原创作者，版权归原作者所有。如涉及版权，请联系删