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)))
是这样的么?