masterlong 发表于 2016-7-4 18:58:56

高飞鸟的动态函数对get类函数关键字的影响

今天调试一个程序
用到了高飞鸟的动态函数
发生一个让我抓狂的事情

监视的回调函数里有如下代码
(initget "A B" 128)
(setq pt (getpoint))
(cond
    ((null pt) (子函数1))
    ((listp pt) (子函数2))
    ((= pt "A") (子函数3))       ;;在使用高飞鸟的动态函数时,必须写成((= (strcase pt) "A") (子函数3))
    ((= pt "B") (子函数4))       ;;同上
)

选点和右键都没问题
就是关键字A、B总出问题
时灵时不灵
花了一下午的时间
怎么调试都不行

最后才发现
必须输入"A"、"B"才能执行后面的函数
如果输入"a"、"b"
initget就不认识了
而原来使用get类函数时
从无此种情况
想来想去
只可能是高飞鸟动态函数的影响

特发此贴
提醒大家注意

masterlong 发表于 2016-7-4 19:22:19

高飞鸟的动态函数非常强大
能够实现一些以前非常渴望却做不到的功能

我的这个程序其中一个功能
在选第1点后开始监视选第2点
根据两点间的关系移动某个图块
加入关键字用于调整图块的角度
在调整角度的这段函数里
多次输入关键字"A"
但是只能执行一次转角
后来我在程序中某处
加入一句(textpage)(graphscr)
这样可以实现连续转角
只是文本窗口会闪一下
算是美中不足吧

除此之外还有一些其它的小问题
好在都通过努力克服了

自贡黄明儒 发表于 2016-7-4 21:12:06

masterlong 发表于 2016-7-4 19:22
高飞鸟的动态函数非常强大
能够实现一些以前非常渴望却做不到的功能



楼主写了个什么程序,动画演示给大伙瞧瞧;高飞贴给个连接呀

masterlong 发表于 2016-7-4 22:44:48

专业上用的程序
还没完成

动画演示没弄过
明天不会太忙
搜一个学习下

高飞鸟的动态函数
一搜就是
手机上就不给链接了
页: [1]
查看完整版本: 高飞鸟的动态函数对get类函数关键字的影响