如何用DCL按钮打开网页（不用command）

bbo

如何用DCL按钮打开网页（不用command）

就是要在对话框里放一个访问作者主页的按钮，但对话框开启时不能用command

skg123

(defun c:tt()
(command "BROWSER" "http://bbs.mjtd.com")
)
可以直接打开网页

mccad

使用VL方式中的AX方法：LaunchBrowserDialog

bbo

能讲一下怎么使用LaunchBrowserDialog吗？

好像没有LaunchBrowserDialog这个函数阿。

bbo

能讲一下怎么使用LaunchBrowserDialog吗？

好像没有LaunchBrowserDialog这个函数阿。

mccad

该函数是AX的函数，帮助内容：
http://www.mjtd.com/object/acad2004/idh_launchbrowserdialog.htm
VL式的例子：

2. (defun Example_LaunchBrowserDialog ()
3.   (vl-load-com)
4. (setq utility (vla-get-utility (vla-get-activedocument (vlax-get-acad-object))))
5. (vla-launchbrowserdialog utility url "明经通道主页" "打开" "http://www.mjtd.com" "mccadweb" :vlax-false)
6. )

(defun Example_LaunchBrowserDialog ()   (vl-load-com) (setq utility (vla-get-utility (vla-get-activedocument (vlax-get-acad-object)))) (vla-launchbrowserdialog utility url "明经通道主页" "打开" "http://www.mjtd.com" "mccadweb" :vlax-false) )

bbo

mccad老大的不行阿

; 错误: ActiveX 服务器返回错误: 非选择性的参数。

skg123

bbo 发表于 2007-1-12 23:37
mccad老大的不行阿; 错误: ActiveX 服务器返回错误: 非选择性的参数。

(vla-launchbrowserdialog utility url "明经通道主页" "打开" "http://www.mjtd.com" "mccadweb" :vlax-false)
vlax-false 改成 1 试试

jyzas

有点收获，又学到一点了