可视opendcl的学习笔记.doc

ObjectDCL学习笔记(1)
初识ObjectDCL
AutoLisp简洁、易学、功能强大，可满足用户的绝大多数需求。对一般的AutoCAD用户来说，AutoLisp是进行开发的首选语言。但AutoLisp使用的对话框编程语言DCL和PDB却实在不敢恭维，其功能、界面、编程方法都不能令人满意。
ObjectDCL应运而生。
1.安装和设置ObjectDCL
1.1运行ObjectDCL文件包中的Setup.exe，一路Next下去，ObjectDCL就被安装到C:\ProgramFiles\3rdDaySoftware\ObjectDCL文件夹中。
1.2在安装ObjectDCL的文件夹中，有ObjectDCL.arx和ObjectDCL2004.arx两个arx库文件。ObjectDCL.arx用于Acad2000/2002，ObjectDCL2004.arx用于Acad2004。为方便编程，把它们拷贝到Acad的支持搜索路径中，或直接把安装ObjectDCL的文件夹设置为Acad的支持搜索路径。
1.3创建一个准备存放ObjectDCL编程结果的文件夹，假设为D:\MyOdcl。把D:\MyOdcl也设置为Acad的支持搜索路径。
现在就可以开始学习ObjectDCL了。
2.启动和认识ObjectDCL
在安装ObjectDCL的文件夹中，有个ObjectDCL.exe文件，它就是ObjectDCL的主程序。运行ObjectDCL.exe，即进入ObjectDCL编辑环境。
2004-6-1520:34:00上传
HYPERLINK"http://bbs.mjtd.com/"\l"#"\o"image002.jpg下载次数:50"\t"_blank"下载附件(32.53KB)ObjectDCL学习笔记(作者：李松)
ObjectDCL的主窗口很简洁，各菜单项的意义也很清楚，且大部分都在HYPERLINK"http://apptools.mjtd.com"\t"_blank"工具条和4个停靠子窗口中有对应的功能，而View菜单是ObjectDCL工具条和下面要说明的4个工具停靠子窗口的开关。工具条中的第一个图标对应的是工程菜单Project的前5个菜单项，用来添加对话框窗体；工具条中的最后一个图标（照相机）对应的是工程菜单View/EditPictureFolder菜单项，用来管理图形资源文件夹。
在ObjectDCL窗体的左侧，上面是控件工具箱(ToolBox)，下面是控件上下次序显示调整窗口(Z/TabOrder)。
在ObjectDCL窗体的右侧，上面是工程结构树窗口(ProjectTree)，下面是对话框/控件属性(Properties)和事件(Events)窗口。
ObjectDCL窗体的中间，就是以后摆放新创建的对话框的位置了。
3.创建一个最简单的对话框
既然是要创建一个最简单的对话框，那就是所谓的“Hello”了。
3.1编写对话框驱动程序框架
在开始创建对话框以前，先创建一个对话框驱动程序的框架:
(defunC:MyHello()
(if(not(member"objectdcl.arx"(arx)))
(arxload"objectdcl.arx""加载objectdcl.arx失败.")
)
(princ)
)
以MyHello.lsp为名保存到D:\MyOdcl文件夹中备用。建议，MyHello.lsp的编辑器不要关闭，我们下面还要用到它。
3.2创建对话框
(1)在Projects菜单中选取AddModalForm菜单项，窗体中就添加了一个没有控件的对话框。这个对话框的默认名为DclForm1。用鼠标单击对话框窗体，则ObjectDCL窗体中右下方的属性页(Properties)中显示出当前对话框的所有属性值。把标题栏文本(TitleBarText)项的内容改为:“Hello”。
(2)在控件工具箱中选择Label控件放到对话框适当的位置。这个Label控件的默认名为Label1。
把Label1的标题(Caption)内容改为:“各位网友，新年好！”。
把Label1的字体(Font)改为你喜欢的字体和大小。
把Label1的背景颜色(BackColor)改成你喜欢的颜色。
把Label1的前景颜色(ForeColor)改成你喜欢的颜色。
调整对话框和Label1的大小。
(3)保存对话框文件
直接单击“Save”工具图标，把新设计的对话框以Hello.odc为名保存到D:\MyOdcl文件夹中。我们这个Hello对话框就制作完成了。
3．3指定与对话框关联的Lisp程序
展开工程结构树窗口中的Visual/AutoLispFilename节点，双击图标，在弹出的“打开”对话框