下载首页 | 资讯中心 | 文章分类 | 最近更新 | 排 行 榜 |
文章搜索: 分类 关键字
您的位置:首页软件教程AutoCADAutoCAD资料教程 → 实用AutoCAD图形文件管理程序
实用AutoCAD图形文件管理程序
日期:2007-9-6 20:56:56 人气:76     [ ]
上一页 [1] [2] [3] 下一页

  PrivateSubFile1—Click);文件列表框name属性

为file1

  getfilename;调用getfilename子程序得到文件全名

?

  showfile;调用showfile子程序显示图形文件

  EndSub

  PrivateSubgetfilename

  IfFile1.ListIndexΛΚ0Then

  selectedfileΚFile1.Path

  IfRight$selectedfile,1)ΙΛ″ι″Then

  selectedfileΚselectedfile+″ι″

  EndIf

  selectedfileΚselectedfile+File1.ListFile1

.ListIndex)

  EndIf

  EndSub

  PrivateSubshowfile);通过OLE将图形文件全名

送往后

  ;台中运

  OLE1.SourceDocselectedfile;行的AutoCADforWIn

dows,

  ;CAD打开

  OLE1.ActionΚole1—activate;文件后,再通过OL

E将图形

  ;回送

  EndSub;CADOLE控件窗口加以显示

  PrivateSubdeletefile

  Killselectedfile;删除图形文件

  currentfileΚFile1.ListIndex-1;文件指针上移

一位

  File1.Refresh;更新文件列表框

  IfFile1.ListCountΚ0Then;如果原来目录下只有

一个图形

  clear;文件,由于没用后继文件可以

  ExitSub;显示,清空CAD—OLE内容

  EndIf

  IfcurrentfileΛΚ0Then

  File1.ListIndexΚcurrentfile

  Else;如果删除的图形文件位于文件

  File1.ListIndexΚ0;列表框首位,将文件指针指

  EndIf;下一个文件

  EndSub

  PrivateSubclear

  OLE1.SourceDocΚ″dιacadιsupportιacad.d

上一页 [1] [2] [3] 下一页
我有问题,我要进入论坛
出处:本站原创 作者:佚名
 热点文章
·如何定制自己的个性化..
·proe超级技巧
·怎样学好PRO/E软件?
·PRO/E COFNIG文件设置..
·PROE将默认英制转换成..
·PRO/E分模经验总结
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·旧版ProE如何读取野火..
·Pro/E如何做两条c2(曲..
·Pro/E 2001下一个阵列..
·一款钣金产品的结构设..
 推荐文章
·翻砂铸造的特点及其工..
·整编SolidWorks应用技..
·模具选材原则
·如何解决中文Pro/E工程..
·Pro/ENGINEER 中的文本..
·Pro/ENGINEER Wildfir..
·模型从proe->ansys..
·用行为建模优化设计的..
·簡單的Top-Down設計實..
·适合初学者的基础练习..
·ProE不传之秘笈(高级技..
·PRO/E 关于零件精度的..
·Pro/E的scan-tools工具..
·关系式的世界
·关系式教程