我如何找到

Lt Dan's l · 发表于 2022-7-6 08:12:04

查找方法，例如

 
(vlax-invoke 
 (vla-getInterfaceObject
   (vlax-get-acad-object)
    "Shell.Application"
 )
 'BrowseForFolder
 (vlax-get 
   (vlax-get-acad-object) 
   'hwnd 
 ) 
 "Select Directory: " 0
)

BlackBox · 发表于 2022-7-6 08:22:34

这可能有助于：

WshShellObject属性和方法

Lt Dan's l · 发表于 2022-7-6 08:27:44

非常感谢。

BlackBox · 发表于 2022-7-6 08:41:20

未经请求，但以下是我使用的几个其他Windows对象：

文件系统对象

SWbemLocatorObject

codered8x · 发表于 2022-7-6 08:47:33

如何获得其他应用程序的方法？示例SHELL，INTERNETEXPLORER，。。。。。我找不到他们帮忙。
如以下常规：

copy

(defun NavigateTo ( url / ie )
 ;; © Lee Mac  ~  02.06.10
 (vl-load-com)
 (if (setq ie (vlax-create-object "InternetExplorer.Application"))
   (progn
     (vlax-put ie 'Visible :vlax-true)
     (vlax-invoke ie 'Navigate url)
     (vlax-release-object ie)
   )
 )
)

或

copy

(setq dir (vlax-invoke (vlax-get-or-create-object "Shell.Application") 'browseforfolder 0 "Select folder with DWG files:" 1 directory ))

如何知道“internetexplorer的导航”或“shell的browserforfolder”方法。应用我想有一个通用的方法来做这件事。谢谢

Lee Mac · 发表于 2022-7-6 08:51:23

以下是Internet Explorer对象的参考：

http://msdn.microsoft.com/en-us/library/aa752084%28v=VS.85%29.aspx

以下是Windows Shell对象的参考：

http://msdn.microsoft.com/en-gb/library/bb774094%28v=vs.85%29.aspx