[求助]如何改变框选后的颜色

qsb506

下面这个附件(XC.VLX).是早期论坛上下的，是计算所有选中线段长度之和，被选中部分颜色变为黑色，指定一个座标点写入长度和的结果，然后又恢复为原来的颜色。象这种功能的LISP程序论坛上有许多贴子，但就是没有象附件中那样，选中后会改变颜色，结束后又还原为原来的颜色，这样的效果LISP应如何写，不知哪位高人能指点下。

 

 

菜冬瓜

1、选中实体

2、调用chprop命令将选择集变成 灰色

3、测量长度并计算

4、写字

5，调用chprop命令将选择集变成 bylayer