CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2022 开发者帮助 › 查看内容

AutoCAD 2022 开发者帮助

匿名块

2024-5-18 18:49| 发布者: admin| 查看: 338| 评论: 0|原作者: admin|来自: AutoCAD

匿名块

您可以通过调用来创建匿名块。为此，必须使用第一个字符的名称和低位设置为 1 的块类型标志（组 70）打开块。AutoCAD 为新的匿名块指定一个名称;名称字符串后面的字符通常会被忽略。然后，您可以像创建常规块一样创建匿名块，只是调用更重要。由于该名称是由 AutoCAD 生成的，因此程序无法通过其他方式知道新块的名称。acdbEntMake()**acedGetInput()

以下代码开始一个匿名块，结束它，并检索其名称。

int status; 
struct resbuf *entlist; 
ads_point basept; 
char newblkname[20]; 
ads_point pnt1 = ( 0.0, 0.0, 0.0); 
entlist = acutBuildList(
    RTDXF0, "BLOCK", 
    2, "*ANON", // Only the '*' matters.
    10, "1", // No other flags are set.
    0 ); 
if (entlist == NULL) { 
    acdbFail("Unable to create result buffer list\n"); 
    return BAD; 
} 
status = acdbEntMake(entlist); 
acutRelRb(entlist); // Release acdbEntMake buffer.
if (status != RTNORM) { 
    acdbFail("Unable to start anonymous block\n"); 
    return BAD; 
} 
// Add entities to the block by more acdbEntMake calls.
. 
. 
. 
entlist = acutBuildList(RTDXF0, "ENDBLK", 0 ); 
if (entlist == NULL) { 
    acdbFail("Unable to create result buffer list\n"); 
    return BAD; 
} 
status = acdbEntMake(entlist); 
acutRelRb(entlist); // Release acdbEntMake buffer.
if (status != RTKWORD) { 
    acdbFail("Unable to close anonymous block\n"); 
    return BAD; 
} 
status = acedGetInput(newblkname); 
if (status != RTNORM) { 
    acdbFail("Anonymous block not created\n"); 
    return BAD; 
}

要引用匿名块，请使用创建一个插入实体。（不能将匿名块传递给 INSERT 命令。acdbEntMake()

继续前面的示例，以下代码片段在（0,0）处插入匿名块。

basept[X] = basept[Y] = basept[Z] = 0.0; 
entlist = acutBuildList(
    RTDXF0, "INSERT", 
    2, newblkname, // From acedGetInput  
    10, basept, 
    0 ); 
if (entlist == NULL) { 
    acdbFail("Unable to create result buffer list\n"); 
    return BAD; 
} 
status = acdbEntMake(entlist); 
acutRelRb(entlist); // Release acdbEntMake buffer.
if (status != RTNORM) { 
    acdbFail("Unable to insert anonymous block\n"); 
    return BAD; 
}