大家好!
我想知道为什么要找到一个返回所选文件完整路径的方法
我找到了以下代码,但它只返回文件夹的完整路径
- (setq shell (vla-getInterfaceObject
- (vlax-get-acad-object)
- "Shell.Application"))
- (setq folder (vlax-invoke-method shell 'BrowseForFolder
- (vla-get-HWND (vlax-get-acad-object)) "Select Directory" 0))
- (setq full-folder-path (vlax-get-property
- (vlax-get-property folder 'Self) 'Path))
|