aardio以com方式开发autocad的库（补充智能提示）

yunle51

想问下，CAD在COM接口下，怎么定义 多选对象?

guangdonglbq

yunle51 发表于 2022-6-10 20:36
想问下，CAD在COM接口下，怎么定义 多选对象?

选择集？看aardio自带的范例:com 组件->AutoCAD->入门
var selection = cad.ActiveDocument.SelectionSets.Add("Test_SelectionSet");
selection.Select ( cad.acSelectionSetAll,,,com.word({0}),com.Variant({"LINE"}) );

旧事阑珊

guangdonglbq 发表于 2022-6-12 10:12
选择集？看aardio自带的范例:com 组件->AutoCAD->入门
var selection = cad.ActiveDocument.SelectionSe ...

请教一下！我用Aardio想实现填充效果，总是提示“对象数组无效”，能否指点一二，填充用Aaardio如何写？谢谢！

1.         patternName = "ANSI31"
   
2.         PatternType = 0
   
3.         bAssociativity = True
   
4.         var hatchObj = cad.ActiveDocument.ModelSpace.AddHatch(PatternType, patternName, bAssociativity)
   
5.        
   
6.        
   
7.         center = {0,0,0}
   
8.         radius = 1
   
9.         var outerLoop = cad.ActiveDocument.ModelSpace.AddCircle(center, radius)
   
10.        
    
11.        
    
12.         hatchObj.AppendOuterLoop (outerLoop)

复制代码

guangdonglbq

旧事阑珊 发表于 2022-8-4 17:10
请教一下！我用Aardio想实现填充效果，总是提示“对象数组无效”，能否指点一二，填充用Aaardio如何写？ ...

AppendOuterLoop参数应该用数组，但，照vba手册抄了一下，下面的代码也不成功。
    import com.acad;
    var cad = com.acad();

    patternName = "ANSI31";
    PatternType = 0 ;
    bAssociativity = true;
    var hatchObj = cad.ActiveDocument.ModelSpace.AddHatch(PatternType, patternName, bAssociativity);

        center = {0;0;0};
        radius = 1;
        var outerLoop={};
        outerLoop[1] = cad.ActiveDocument.ModelSpace.AddCircle(center, radius);
        outerLoop[2] = cad.ActiveDocument.ModelSpace.AddCircle({2;2;0}, radius);   
        hatchObj.AppendOuterLoop (outerLoop);
        hatchObj.Evaluate();
        cad.ActiveDocument.Regen();

暂时未能解决这个问题

旧事阑珊

guangdonglbq 发表于 2022-8-4 22:47
AppendOuterLoop参数应该用数组，但，照vba手册抄了一下，下面的代码也不成功。
    import com.acad;
...

谢谢你的回复！
我偿试了几种方式转换数据类型，都不成功，也按VBA手册代码试过，也不行，所以才发贴请教！我看了aardio使用手册上，估计是“COM与aardio间的数据类型转换”这一块的问题，但水平不够，看的不太明白。