sheshy 发表于 2003-12-17 12:32:00

如何做一个menu,列出固定目录下的文件。点击文件名就打开该文件????

如何做一个menu,列出固定目录下的文件。点击文件名就打开该文件????

谁有相关的代码。。请发给sheshy@163.com

f5612140 发表于 2003-12-17 12:43:00

1.很好的點子
2.參考2004中"工具->自訂->編輯自訂檔->目前的功能表",如法炮製如何

sheshy 发表于 2003-12-17 13:06:00

1,我的目的是要写一个程序,自动列出固定目录的文件。。不是写死的
2,我不知道ID_Open      [&Open...\tCtrl+O]^C^C_open 中的open命令如何改进,直接在CAD中打开一个指定的文件

f5612140 发表于 2003-12-17 13:52:00

1.類似檔案總管的方式吧
2.檔案類型是否不限
3.在command下鍵入"explorer"可進入檔案總管,將"explorer"簡化命令(修改acad.pgp)是否合用

sheshy 发表于 2003-12-17 15:09:00

1,你说的不适用我的要求

2,我要求的是:Menu的SubMenu就是目录名,这个目录名的SubMenu就是当前目录的文件名

3,点击Menu->SubMenu(Dir Name)->SubMenu(File Name) 就在CAD中打开该文件

例如我要固定显示C:\mycad\下面的文档

C:\mycad\下的结构为:

C:\mycad\company1
    C:\mycad\company1\file1
    C:\mycad\company1\file2
C:\mycad\company2
    C:\mycad\company2\file1
    C:\mycad\company2\file2

我希望的结果是:
CAD里面多出一个Menu叫mycad

mycad的SubMenu分别是company1 company2
company1的SubMenu是file1 file2

选择mycad->company1->file1就直接打开file1

f5612140 发表于 2003-12-17 17:35:00

老大,您講了半天,還是講*.mns內的東西

meflying 发表于 2003-12-17 17:51:00

将以下文件中的内容写到acad.lsp里,主要是保证每打开一个文档都加载它
说明:
(setq path "E:\\wjh");此处修改你需要的目录
(setq MyMark "打开文件");此处修改你在菜单中开始的显示,就是你的Mycad
(if (< m 1);此处修改你的目录内部目录嵌套的此处,为防止超出CAD限制,设次限制,不是内部所有的目录都有,另,尽量不要有没有DWG文件的目录,因为这些目录也会被收入,但是空的,占地方。。。

有问题再问。。。
页: [1]
查看完整版本: 如何做一个menu,列出固定目录下的文件。点击文件名就打开该文件????