vlisp如何打开多重选择文件对话框

龙龙仔

afeng0712发表于2005-10-13 22:38:00龙老大，对话框打开后若取消会出错？能不能返回是NIL就好了，这样可执行相应后面操作！

;;调用命令
(defun C:TT (/ DIATL FILTER FLAGS INITDIR MAXFS)
  (setq MAXFS 32767
 FLAGS (+ 4 512 524288 1048576 1024)
 DIATL "请选择"
 FILTER "CAD图档(*.DWG)|*.DWG|所有档(*.*)|*.*"
 INITDIR ""
  )
  (MJTD_GETFILEM MAXFS FLAGS DIATL FILTER INITDIR)
)

用你的程序改的---> (vlax-put-property WINCOMDLG 'CANCELERROR :vlax-false)

xiaomu

龙版：

为什么用 (vlax-get wincomdlg 'filename)可以得到返回值，

而 (comdlgp-get-FileName wincomdlg) 却只有路径没有文件名呢？

这两个到底有什么差别？

hnfsf

龙版：

mjtd-getfiles函数如何指定初始目录？每次运行的目录都是很乱的。

 

无痕

可能程序中初始目录是定义为当前目录吧：）

参数 0

龙龙仔

INITDIR 参数就是要你自己给初始目录!

hnfsf

龙龙仔发表于2005-11-11 7:50:00INITDIR 参数就是要你自己给初始目录!

MJTD_GETFILEM  这个函数我知道是initdir

我指的是mjtd-getfiles函数，也就是你前面贴的那个。

;;test OK with XP
;;(mjtd-getfiles DialogTitle filter)
;;(mjtd-getfiles "选择图形文件" "Drawing Files|*.dwg|All Files|*.*")
 

这里面没有目录参数啊。

hnfsf

因为决定mjtd-getfiles函数使用要简洁些，所以。。。

龙龙仔

简洁指的是什么?

但(MJTD_GETFILEM MAXFS FLAGS DIATL FILTER INITDIR)较完整

hnfsf

因为搞不清楚

MAXFS 32767
 FLAGS (+ 4 512 524288 1048576 1024)

的作用，所以

龙龙仔

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cmdlg98/html/vbproflagsfile.asp