skny2011 发表于 2019-5-20 14:29:00

分享一个将CLine、Line、shape转换成keepout anti etch的shape的skill,源码奉上

本帖最后由 skny2011 于 2019-5-21 11:40 编辑


分享一个将CLine、Line、shape转换成keepout anti etch的shape的skill,源码奉上
功能很简单,操作不作详细描述了,有一个问题就是手动关闭Form后,skill依然在执行。

另外,请教大家一个问题,怎么在循环过程中创建类似Oops的这个操作,谢谢大家,我这个现在只能一次回退到最开始。

两个问题已经解决:
1.创建类似Oops的这个操作:原来是我函数用错了,应该用axlDBTransactionMark(),我用成了axlDBTransactionCommit(),所以一下回退到最开始的状态。
已下载的附件的网友们,可直接在if(sel_list这一行的上一行添加axlDBTransactionMark(startMark),即可更改成功。不用重复下载附件,浪费贡献值。

2.手动关闭Form后,skill依然在执行:判定Form的doneState,手动关闭Form时,doneState值为3。
已下载的附件的网友们,可直接添加以下粉色代码到对应位置即可:
defun(ShapeForm_Action (myform)
      let(()
       以上是原始程序,以下是新增代码:
      if(myform->doneState!=0
                then
                        POP_Done()
                )
       以下是原始程序,以上是新增代码:
         case(myform->curField

分享出来给大家 ,希望有用。

hyper 发表于 2019-5-21 12:54:58

哈哈,厉害,现在认真写的比较少了

skny2011 发表于 2019-5-21 13:38:03

hyper 发表于 2019-5-21 12:54
哈哈,厉害,现在认真写的比较少了

自学中,慢慢研究吧。。。。

s88014081 发表于 2019-5-21 17:13:36

厉害,感谢分享

LJ李杰 发表于 2019-5-30 10:16:30

哈哈,厉害,现在认真写的比较少了

825cow 发表于 2019-6-8 14:28:57

谢谢分享,。

JY2580 发表于 2019-6-10 17:20:12

感谢分享。。。。。。。

.vEフ_oo_侽生、 发表于 2019-6-11 08:48:32


哈哈,厉害,现在认真写的比较少了

s88014081 发表于 2019-6-29 12:06:05

谢谢你的分享

ASDK 发表于 2020-1-3 22:26:23

学习了,厉害厉害
页: [1] 2
查看完整版本: 分享一个将CLine、Line、shape转换成keepout anti etch的shape的skill,源码奉上