是否可以使用 Autodesk.AutoCAD.Interop 在 AutoCAD 中編輯塊屬性？

Question

我開發了一個外部 WPF 應用程序來在 c# 中生成繪圖。 我已經能夠使用 Autodesk.AutoCAD.Interop 繪制、標注、添加塊以及應用程序所需的所有其他內容，但是我似乎無法填充標題塊或生成零件清單。

我看到的所有示例都基於要求應用程序作為插件在 AutoCAD 中運行的機制。 事實是，使用 ModelSpace.InsertLine 插入一行代碼是一兩行代碼，現在，它至少有 8 行代碼！

有沒有辦法使用 Autodesk.AutoCAD.Interop 實現此功能？ 或者有沒有辦法將互操作與可以從外部exe調用的插件結合使用？

對此的任何指示將不勝感激。

謝謝。

編輯來說明：

// before - Draw Line with Autodesk.AutoCAD.Interop
private static AcadLine DrawLine(double[] startPoint, double[] endPoint)
{
    AcadLine line = ThisDrawing.ModelSpace.AddLine(startPoint, endPoint);
    return line;
}
// Now - Draw line with Autodesk.AutoCAD.Runtime
[CommandMethod("DrawLine")]
public static Line DrawLine(Coordinate start, Coordinate end)
{
    // Get the current document and database 
    // Get the current document and database
    Document acDoc = Application.DocumentManager.MdiActiveDocument;
    Database acCurDb = acDoc.Database;

    // Start a transaction
    using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction())
    {
        // Open the Block table for read
        BlockTable acBlkTbl;
        acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId, OpenMode.ForRead) as BlockTable;

        // Open the Block table record Model space for write
        BlockTableRecord acBlkTblRec;
        acBlkTblRec = acTrans.GetObject(acBlkTbl[BlockTableRecord.ModelSpace], OpenMode.ForWrite) as BlockTableRecord;

        // Create a line that starts at 5,5 and ends at 12,3
        Line acLine = new Line(start.Point3d, end.Point3d);

        acLine.SetDatabaseDefaults();

        // Add the new object to the block table record and the transaction
        acBlkTblRec.AppendEntity(acLine);
        acTrans.AddNewlyCreatedDBObject(acLine, true);

        // Save the new object to the database
        acTrans.Commit();
        return acLine;
    }
}

Answer 1

是的，您絕對可以將這兩種方法結合起來。

1. 編寫一個在 AutoCAD 中完成工作的進程內 DLL。 通過使用 [CommandMethod("MethodName")] 標記您的公共方法，使您希望調用的命令可用於命令行。

2. 通過互操作調用啟動或連接 AutoCAD。

3. 使用互操作 AcadApplication，網絡加載您的 DLL，然后從命令行調用您的工作函數。

*獎勵 *您也可以通過這種方式更輕松地將互操作參數傳遞給內部命令。

下面是一個示例，說明如何在進程內構建命令方法，然后通過 COM 調用它：

[CommandMethod("EditBlockAtt")]
public void EditBlockAtt()
{
    var acDb = HostApplicationServices.WorkingDatabase;
    var acEd = AcadApplication.DocumentManager.MdiActiveDocument.Editor;

    var blockNamePrompt = acEd.GetString(Environment.NewLine + "Enter block name: ");
    if (blockNamePrompt.Status != PromptStatus.OK) return;
    var blockName = blockNamePrompt.StringResult;

    var attNamePrompt = acEd.GetString(Environment.NewLine + "Enter attribute name: ");
    if (attNamePrompt.Status != PromptStatus.OK) return;
    var attName = attNamePrompt.StringResult;

    var acPo = new PromptStringOptions(Environment.NewLine + "Enter new attribute value: "){ AllowSpaces = true };
    var newValuePrompt = acEd.GetString(acPo);
    if (newValuePrompt.Status != PromptStatus.OK) return;
    var newValue = newValuePrompt.StringResult;

    using (var acTrans = acDb.TransactionManager.StartTransaction())
    {
        var acBlockTable = acTrans.GetObject(acDb.BlockTableId, OpenMode.ForRead) as BlockTable;
        if (acBlockTable == null) return;

        var acBlockTableRecord = acTrans.GetObject(acBlockTable[BlockTableRecord.ModelSpace], OpenMode.ForRead) as BlockTableRecord;
        if (acBlockTableRecord == null) return;

        foreach (var blkId in acBlockTableRecord)
        {
            var acBlock = acTrans.GetObject(blkId, OpenMode.ForRead) as BlockReference;
            if (acBlock == null) continue;
            if (!acBlock.Name.Equals(blockName, StringComparison.CurrentCultureIgnoreCase)) continue;
            foreach (ObjectId attId in acBlock.AttributeCollection)
            {
                var acAtt = acTrans.GetObject(attId, OpenMode.ForRead) as AttributeReference;
                if (acAtt == null) continue;

                if (!acAtt.Tag.Equals(attName, StringComparison.CurrentCultureIgnoreCase)) continue;
                    
                acAtt.UpgradeOpen();
                acAtt.TextString = newValue;
            }
        }

        acTrans.Commit();
    }
}

然后從互操作 AcadApplication 中，netload dll 並以以下格式從命令行調用該方法：

(Command "EditBlockAtt" "BlockName" "AttributeName" "NewValue")

但是，如果您想使用純互操作，這可能會滿足您的需求，因為您在運行時有一個 AcadDocument 對象：

foreach (AcadEntity ent in acadDoc.ModelSpace)
{
    var block = ent as AcadBlockReference;
    if (block == null) continue;
    {
        if (!block.Name.Equals("BlockName", StringComparison.CurrentCultureIgnoreCase)) continue;
        var atts = block.GetAttributes() as object[];
        if (atts == null) continue;

        foreach (var attribute in atts.OfType<AcadAttributeReference>()
            .Where(attribute => attribute.TagString.Equals("AttributeName", 
                                StringComparison.CurrentCultureIgnoreCase)))
        {
            attribute.TextString = "New Value";
        }
    }
}

另請注意，這是使用 AutoCAD 2012 互操作庫。 天啊。