taoyi0727 发表于 2019-4-12 13:36:53

nSecondsToWait 问下这个参数是什么刚才试了下试不出来

taoyi0727 发表于 2019-4-12 13:51:41

找到了
nSecondsToWait '等待选择的秒数。若选择超时,消息框自动关闭,返回值 -1
               '缺省值 0 秒,必须选择一个按钮,消息框才会关闭
好像在lisp里这个没有用

http://www.bathome.net/thread-19604-1-1.html

刘仁钊 发表于 2019-4-12 14:30:45


命令: bb1 ; 错误: no function definition: VLAX-GET-ACAD-OBJECT

1291500406 发表于 2019-4-12 14:44:22

本帖最后由 1291500406 于 2019-4-13 15:38 编辑

刘仁钊 发表于 2019-4-12 14:30
命令: bb1 ; 错误: no function definition: VLAX-GET-ACAD-OBJECThttp://bbs.mjtd.com/forum.php?mod=viewthread&tid=90879&highlight=vlax-get-acad-object
试试加
(vl-load-com)



刘仁钊 发表于 2019-4-14 09:43:26

加载了(vl-load-com)成功了,谢谢!!

菜卷鱼 发表于 2019-6-22 16:19:38

流弊啊,这种调用的代码就不会写

石井鱼 发表于 2019-7-23 09:07:21

学习了

Kye 发表于 2019-12-28 17:36:14

本帖最后由 Kye 于 2019-12-28 17:42 编辑

弹出消息框之前,需要点击任务栏中出现的按钮,这等于点击了两次,有什么办法少点击一次

Cad船长 发表于 2020-5-19 17:33:24

(setq atr (bbalert(strcat "即将统一标注样式,请确认出图比例设置是否与图纸图框比例匹配。匹配点确定,否则点取消后先正确设置出图比例再统一!!" )2 "提示:" 1))
(princ atr)
(if (= atr2)(exit))

经测试,没有取到返回值,这个判断点了哪个按钮的返回值该怎么取呢?

llsheng_73 发表于 2020-5-19 17:53:37

(defun AlertX(TITLE String nSeconds f / WSH a)
(setq WSH(vlax-create-object "WScript.shell"))
(if(vl-catch-all-error-p(setq a(vl-catch-all-apply'vlax-invoke-method(list WSH 'Popup String nSeconds TITLE f))))
    (alert String)(progn(vlax-release-object WSH)a)))
是这样的么?
页: 1 [2] 3
查看完整版本: bbalert 16种提示模式