[ARX程序]：一个看似简单的编程问题,困扰了我一个月....请高手指点!

Corilla

我想实现一个程序,在图纸空间内,用鼠标选择一个文, ,程序自动把文本的内容复制下来, 再用鼠标选择第二个文本, 这时程序会自动把第二个文本的内容替换成第一个文本的内容! 操作完毕!

我写了好多多次, 参考一些例子, 进行多次修改, 可就是无法把这个程序成功的写出来!
我是一个新手,苦于没有导师, 只能是自学了, 觉得很吃力, 连上面这样的简单(我想应该不会很难, 但对于我这瞎摸的新手, 已经是很难了 )的例子都写不成功, 心里真不是个滋味, 现在一点劲都提不起来, 恳请那位高手大虾好心能帮帮小弟. 完成这个程序咯! (核心代码就行了)
激不尽!

easypower

選擇文本圖元會不會,會的話就沒有人和問題呀!

我會繼續灌注你這個帖子

直到你會了為止

很容易的

動手就會了

ishou

Corilla ,  你在另外一个贴子中提出同样的问题，我在21日 把你的程序改写后已贴出，你没有看到
啊？该改写后的程序已在我的AutoCAD中试运行正常。在这里我再次 把该程序提供如下:

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. }
    

复制代码

Corilla

很感谢各位前辈以小弟的指点与帮助, 今天这个程序总算是通过测试了, 心里很振奋! 毕竟这是本人学习ARX以来所写的第一个用于应用的程序, 虽然是那么简单, 但对小弟来说已经是很艰辛了.
整个过程中,小弟犯了一个很严重的错误, 因为我对AutoCAD不熟悉, 我把多行文本误以为是单行文本, 用多行文本去测试程序, 所以程序肯定不会成功通过测试! (这算是这程序困扰差不多一个月的主要原因了.当然工作忙,未能专心学习ARX也是原因之一).

下一步工作: 是把这个这个程序写好,A)加入选中焦点功能,如选中一个文本,显示为虚字; B)加入一对多复制功能!如一次性可以修改后选择的多个文本里的内容,使它们和第一个文本内容一样.

希望各位大家能继续的支持我...
以后我将会把代码贴上来让大家来指正....


在这再次特别感谢ishou前辈!

小树袋熊

受教育了

gaoxianglxj

不错