[ARX程序]：求助:ARX程序,无法实现,请大虾帮助改正和指正!

Corilla

/////////////////////////////////////////////
程序目的:
在图内,通过鼠标选择第一字符串,把它复制内容下来,再选择第二个字符串,这时第二个字符串的内容变成和第一个字符串的内容相同!(实际上是字符串的内容复制)

[php]
// ObjectARX defined commands

#include "StdAfx.h"
#include "StdArx.h"


// This is command 'STRINGMATCH'
void corillastringmatch()
{
        // TODO: Implement the command
        ads_name ent1;    //实体名变量
        struct resbuf *cb=NULL,*ed=NULL;  //缓冲区
//        char changestr[20];

//        if(acdbEntNext(NULL,ent1)!=RTNORM)
//        {
//                acutPrintf("当前图纸实间没有任何实体!");
               
//        }

if((ed=acdbEntGet(ent1))!=NULL){    //取得实体
       
        for(cb=ed;cb!=NULL;cb=cb->rbnext)  //实体数据
        {
                if(cb->restype==0){     //断定所选实体是否为文本
                        if (strcmp(cb->resval.rstring,"TEXT")!=RTNORM) {
                                acutRelRb(ed);
                                acutPrintf("你选择的实体错误,请指定字符实体!");
                        }
                }

                if (cb->restype==1) {     //修改文本内容
                //        acedGetString(20,"请输入要修改的字符串:",changestr);
                        strcpy(cb->resval.rstring,"11111");       
                }

                if(acdbEntMod(ed)!=RTNORM){   //修改数据库
                        acutRelRb(ed);
                        acutPrintf("修改数据库出错!");
                       
                }
                else{
                        acdbEntUpd(ent1);   //更新文本
                        acutRelRb(ed);
                }
       
        }
}
acutPrintf("为空!");
acutRelRb(ed);

       
/*        ed=acdbEntGet(ent2);
        for(cb=ed;cb!=NULL;cb=cb->rbnext)
        {
                if(cb->restype==0){
                        if (strcmp(cb->resval.rstring,"TEXT")!=RTNORM) {
                                acutRelRb(ed);
                                acutPrintf("你选择的实体错误,请指定字符实体!");
                               
                        }
                }
               
                if (cb->restype==1)
                        strcpy(cb->resval.rstring,changestr);
                if(acdbEntMod(ed)!=RTNORM){
                        acutRelRb(ed);
                        acutPrintf("修改数据库出错!");
                       
                }
                else{
                        acdbEntUpd(ent2);
                }
               
                break;
        }
       
        acutRelRb(ed);
        */

}
[/php]

整个程序经多次更改无法通过实现,出错在何处,望有人能指点迷津!感激不尽!

ishou

if((ed=acdbEntGet(ent1))!=NULL){ //取得实体[/COLOR]

   不是“取得实体”[/COLOR] 而是 “取得实体的数据记录”
You have to call  acedEntSel()  to set ent1 with a valid  value before call acedEntGet():[/COLOR]

1. 
   
2. ads_name   ent1;
   
3. ads_point    pickPt1;
   
4. int   k;
   
5. 
   
6. k = acedEntSel ("\nPick first text: ",  ent1, pickPt1);
   
7. if (k != RTNORM)  {
   
8.     .........;
   
9.     return;
   
10. }
    
11. 
    
12. ed = acedEntGet(ent1);
    
13. .......
    
14. 
    

复制代码

frankzht

有什么出错提示？

Corilla

void TextToText()
{
        // TODO: Implement the command
        ads_name ent1,ent2;                                        //实体名变量
        struct resbuf *cb=NULL,*ed=NULL;        //缓冲区
        ads_point    pickPt1,pickPt2;        //拾取点
        char replacestring[20];                //替换过渡变量

//判断当前图纸空间是否存在实体

  if(acdbEntNext(NULL,ent1)!=RTNORM)
   {
        acutPrintf("当前图纸实间没有任何实体!");
        return;               
   }

//判断所选择的是否是文本；取得文本的内容并复制到replacestring变量。
       
if(acedEntSel("\nPick first text: ",  ent1, pickPt1)==RTNORM)//选择实体
{
    if((ed=acdbEntGet(ent1))!=NULL){        //取得实体数据记录
     for(cb=ed;cb!=NULL;cb=cb->rbnext){
                if(cb->restype==0){    //检验实体类型是否为文本(代码为0
                                                  //是记录实体类型吗?
                      if (strcmp(cb->resval.rstring,"TEXT")!=RTNORM) {                         acutRelRb(ed);
                 acutPrintf("你选择的实体错误,请指定字符实体!");
                 return;
        }
                 }

               if (cb->restype==1) {
        strcpy(replacestring,cb->resval.rstring); //把文本的内容
                  //拷贝出来代码为1是记录内容的吗？

        }                                      
           }
     }
    acutRelRb(ed);
}


if(acedEntSel("\nPick first text: ",  ent2, pickPt2)==RTNORM)  //选择第二个实体
{
     if((ed=acdbEntGet(ent2))!=NULL)
      {
          for(cb=ed;cb!=NULL;cb=cb->rbnext)
          {
               if(cb->restype==0){
                      //验证第二个实体的类型是否也为文本
        if (strcmp(cb->resval.rstring,"TEXT")!=RTNORM) {   
                          acutRelRb(ed);
             acutPrintf("你选择的实体错误,请指定字符实体!");
             return;
        }
                 }

//把刚才拷贝的第一文本内容传给第二文本               
              if (cb->restype==1)
                 strcpy(cb->resval.rstring,replacestring);  

//更改数据库
       if(acdbEntMod(ed)!=RTNORM){
        acutRelRb(ed);
        acutPrintf("修改数据库出错!");
        return;
                }
               else
              {
                   acdbEntUpd(ent2);        //更新实体
        }
               break;   //退出循环
           }
           acutRelRb(ed);                //释放缓冲区
   }
}
               
} //程序结束

编译没有错，操作时却实现不了程序的功能--文本间内容的拷贝！请大虾帮帮小弟....

ishou

1)
if (strcmp(cb->resval.rstring,"TEXT")!=RTNORM[/COLOR]) { acutRelRb(ed);
acutPrintf("你选择的实体错误,请指定字符实体!");
return;
}

--->>> Correct as follow:
if (strcmp (cb->resval.rstring,"TEXT") !=0[/COLOR] ) { acutRelRb(ed);
acutPrintf("你选择的实体错误,请指定字符实体!");
return;
}

-------------
2)
//把刚才拷贝的第一文本内容传给第二文本
if (cb->restype==1)
strcpy(cb->resval.rstring,replacestring); [/COLOR]

--->>>   It is  very dangerous!  It  may Crash AutoCAD! Correct as follow:

struct resbuf *tmp;
char             *sp;

tmp = acutBuildList(RTSTR, replacestring, 0);
sp = cb->resval.rstring;
cb->resval.rstring = tmp->resval.rstring;
tmp->resval.rstring = sp;
acutRelRb(tmp);

Corilla

很感谢楼上的指导，不过由于我的经验不足，加之挺蠢的，到现在为止还是无法把程序完成，功能还是无法实现，不知为什么。。。。。。。。。。
恳请你能不能把我的代码改正过来贴上来呢？感谢感谢了！

ishou

1. 
   
2. void TextToText()
   
3. {
   
4.     struct resbuf *cb, *ed1, *ed2, *tmp;
   
5.     ads_name   ent1,ent2;
   
6.     ads_point  pickPt1,pickPt2;
   
7.     char       *sp1, *sp2;
   
8.     int        es;
   
9. 
   
10. 
    
11.     es = acedEntSel("\nPick first text: ", ent1, pickPt1);
    
12.     if (es != RTNORM) return;
    
13. 
    
14.     ed1 = acdbEntGet(ent1);
    
15.     for (cb =ed1; cb; cb =cb->rbnext) {
    
16.         if (cb->restype==0) {
    
17.             if (strcmp(cb->resval.rstring,"TEXT") != 0) {
    
18.                 acutRelRb(ed1);
    
19.                 acutPrintf("你选择的实体错误,请指定字符实体!");
    
20.                 return;
    
21.             }
    
22.         } else if (cb->restype==1) {
    
23.             sp1 = cb->resval.rstring;
    
24.         }
    
25.     }
    
26. 
    
27.     es = acedEntSel("\nPick second text: ", ent2, pickPt2);
    
28.     if (es != RTNORM) {
    
29.         acutRelRb(ed1);
    
30.         return;
    
31.     }
    
32. 
    
33.     ed2 = acdbEntGet(ent2);
    
34.     for (cb =ed2; cb; cb =cb->rbnext) {
    
35.         if (cb->restype==0) {
    
36.             if (strcmp(cb->resval.rstring,"TEXT") != 0) {
    
37.                 acutRelRb(ed1);
    
38.                 acutRelRb(ed2);
    
39.                 acutPrintf("你选择的实体错误,请指定字符实体!");
    
40.                 return;  //
    
41.             }
    
42.         } else if (cb->restype==1) {
    
43.             tmp = acutBuildList(RTSTR, sp1, 0);
    
44.             sp2 = cb->resval.rstring;
    
45.             cb->resval.rstring = tmp->resval.rstring;
    
46.             tmp->resval.rstring = sp2;
    
47.             acutRelRb(tmp);
    
48.             break;
    
49.         }
    
50.     }
    
51. 
    
52.     acdbEntMod(ed2);
    
53.     acdbEntUpd(ent2);
    
54. 
    
55.     acutRelRb(ed1);
    
56.     acutRelRb(ed2);
    
57. }
    

复制代码

This program have been tested pass in my Computer.[/COLOR]