从objectarx帮助里抄的创建匿名块的程序怎么不能运行？

xulpec

从objectarx帮助里抄的创建匿名块的程序，为什么status != RTKWORD？
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;
}

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;

}

xulpec

请大家帮忙找出原因。我调试发现问题出在下面代码。status = acdbEntMake(entlist);返回值为-5003.status != RTKWORD
status = acdbEntMake(entlist);
acutRelRb(entlist); // Release acdbEntMake buffer.
if (status != RTKWORD) {
acdbFail("Unable to close anonymous block\n");
return BAD;

}

LoveArx

最初由 xulpec 发布
请大家帮忙找出原因。我调试发现问题出在下面代码。status = acdbEntMake(entlist);返回值为-5003.status != RTKWORD
status = acdbEntMake(entlist);
acutRelRb(entlist); // Release acdbEntMake buffer.
if (...

1. 
   
2. entlist = acutBuildList(RTDXF0, "ENDBLK", 0 );
   
3. 
   
4. if (entlist == NULL) {
   
5. acdbFail("Unable to create result buffer list\n");
   
6. return BAD;
   
7. }
   
8. 
   
9. status = acdbEntMake(entlist);
   
10. acutRelRb(entlist); // Release acdbEntMake buffer.
    
11. 
    
12. if (status != RTKWORD) {
    
13. acdbFail("Unable to close anonymous block\n");
    
14. return BAD;
    
15. 
    
16. }
    

复制代码

上面代码status != RTKWORD有问题，应该改为status != RTNORM

你去试试。

xulpec

objectarx帮助里是RTKWORD，我从帮助里照抄的。即使为RTNORM也不行，我调试发现status=-5003,相当于status=RTREJ。

LoveArx

最初由 xulpec 发布
objectarx帮助里是RTKWORD，我从帮助里照抄的。即使为RTNORM也不行，我调试发现status=-5003,相当于status=RTREJ。

你还是把整个的函数都贴到论坛来吧，是不是你哪里录入错误了啊。

LoveArx

仔细看了下你的代码，你定义的块中没有实体啊

1. 
   
2. entlist = acutBuildList(
   
3. RTDXF0, "BLOCK",
   
4. 2, "*ANON", // Only the '*' matters.
   
5. 10, "1", // No other flags are set.
   
6. 0 );
   
7. 
   
8. if (entlist == NULL) {
   
9. acdbFail("Unable to create result buffer list\n");
   
10. return BAD;
    
11. }
    
12. 
    
13. status = acdbEntMake(entlist);
    
14. acutRelRb(entlist); // Release acdbEntMake buffer.
    
15. 
    
16. if (status != RTNORM) {
    
17. 
    
18. acdbFail("Unable to start anonymous block\n");
    
19. return BAD;
    
20. }
    
21. 
    

复制代码

在上面代码后面，和下面的 endblk 封闭前，应该有你的实体加入块的，现在直接就封闭了，就有问题了。

xulpec

我上面的代码是完全从objectarx帮助里抄过来的，我曾在中间画了一个圆也不行。画圆代码如下.
entlist = acutBuildList(RTDXF0, "CIRCLE",// Entity type  
    8, layer, // Layer name
    10, center, // Center point
    40, 10.0, // Radius
    0 );

if (entlist == NULL) {
    acdbFail("Unable to create result buffer list\n");
    return ;
}

status = acdbEntMake(entlist);
acutRelRb(entlist); // Release acdbEntMake buffer.

if (status == RTERROR) {

    acdbFail("Unable to make circle entity\n");
    return ;

}