将图形文件添加到传递集。 支持的平台:仅窗口 Namespace:传输利布 组装:acETransmit20.tlb 签名VBA/VB.NET: RetVal = object.addDrawingFile(fullpathname, ppIAddedFile) C#: RetVal = object.addDrawingFile(fullpathname, out ppIAddedFile); 言论没有额外的评论。 发布信息释放:AutoCAD 2005 及更高版本 历史
例子VB.NET: ' Custom command to create a transmittal package with a drawing file <CommandMethod("eTransmitDWGFile")> _ Public Shared Sub eTransmitDWGFile() ' Create a transmittal operation Dim tro As TransmittalOperation = New TransmittalOperation() ' Setup the transmittal behavior Dim ti As TransmittalInfo = _ TransInfo(tro.getTransmittalInfoInterface(), "C:\Users\Public\TransmittalAPITest\") ' Add a DWG file Dim tf As TransmittalFile = Nothing tro.addDrawingFile("C:\AutoCAD\Sample\Sheet Sets\Architectural\A-02.dwg", tf) ' Reclaculate the sub path for all files in the transmittal package tro.recalcTargetSubPath() ' Create the transmittal package ' Files are copied and resaved to the path specified by the destinationRoot property ' and the other settings of the TransmittalInfo object. tro.createTransmittalPackage() End Sub C#: // Custom command to create a transmittal package with a drawing file [CommandMethod("eTransmitDWGFile")] public static void eTransmitDWGFile() { // Create a transmittal operation TransmittalOperation tro = new TransmittalOperation(); // Setup the transmittal behavior TransmittalInfo ti = TransInfo(tro.getTransmittalInfoInterface(), "C:\\Users\\Public\\TransmittalAPITest\\"); // Add a DWG file TransmittalFile tf = null; tro.addDrawingFile("C:\\AutoCAD\\Sample\\Sheet Sets\\Architectural\\A-02.dwg", out tf); // Reclaculate the sub path for all files in the transmittal package tro.recalcTargetSubPath(); // Create the transmittal package // Files are copied and resaved to the path specified by the destinationRoot property // and the other settings of the TransmittalInfo object. tro.createTransmittalPackage(); } |
|Archiver|CAD开发者社区 ( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-1-8 19:06
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.