使用command打不开对话框
遇到一个很离谱的问题,在win11系统的电脑上,使用(command "color")可以正常打开颜色选择框,在win7的电脑上,使用(command "color")就不会弹框,版本都是2011是一样的,(command "color")打不开对话框只是特例,例如(command "style")(command "insert")这类都是打不开对话框,正常在命令行输入color可以打开,就是用代码打开的时候打不开
(vla-sendcommand(vla-get-ActiveDocument (vlax-get-acad-object)) "color ") FILEDIA,1 ;显示“图形另存为”对话框
难道是这个系统变量的问题? (acad_colordlg colornum ) 你有种再说一遍 发表于 2024-3-13 20:27
FILEDIA,1 ;显示“图形另存为”对话框
难道是这个系统变量的问题?
这个系统变量看了都是1, xj6019 发表于 2024-3-13 19:29
(vla-sendcommand(vla-get-ActiveDocument (vlax-get-acad-object)) "color ")
这个可以,大佬太强了,谢谢大佬 masterlong 发表于 2024-3-13 21:15
(acad_colordlg colornum )
谢谢大佬,这个可以弹出颜色框,但是我不止要弹出颜色对话框,还要弹出线型,样式什么的对话框 本帖最后由 xyp1964 于 2024-3-14 13:29 编辑
一只傲娇喵 发表于 2024-3-14 09:07
谢谢大佬,这个可以弹出颜色框,但是我不止要弹出颜色对话框,还要弹出线型,样式什么的对话框
(defun vsc(cname)(vla-sendcommand(vla-get-ActiveDocument (vlax-get-acad-object))(strcat cname " "))(princ))
(defun c:st()(vsc"style")(princ))
(defun c:co()(vsc"color")(princ))
(defun c:lt()(vsc"ltype")(princ))
(defun c:pj ()(if (setq ss (ssget))(command "pedit" "m" ss "" "j" "0" ""))(princ))
xyp1964 发表于 2024-3-14 13:26
一只傲娇喵 发表于 2024-3-14 09:07
谢谢大佬,这个可以弹出颜色框,但是我不止要弹出颜色对话框,还要弹 ...
谢谢大佬,这个发送命令是异步的吧,能不能获取它的返回值呢
页:
[1]