基于Delphi70實现试题库编辑管理系统.docVIP

基于Delphi7.0实现试题库编辑管理系统 在试题库系统的设计开发中，常需处理同时含有文本和图形的图文试题信息。其中图表、公式及特殊字符等对象一直是用计算机高级语言设计制作试题库的难题[1]。本文利用Micorsoft Word2003作为试题编辑工具，并利用Delphi7.0的TImage元件以图形方式显示Word编辑的图文试题内容，实现试题编辑维护和试题基本信息与图文内容的同窗口同步显示，效果较好，在文中给出了具体的编程实现过程。 1、设计构思 采用Delphi7.0可视化程序开发工具、Microsoft Word2003和Access2003作为开发环境来建立试题库管理系统。Delphi7.0是优秀的Windows软件开发工具之一，其访问和控制Word的方法较多，主要有：OLE(Object Linking and Embedding，对象链接嵌入)、Delphi的Servers控件、COM(Component Object Mode，组件对象模型)技术以及DDE(Dynamic Data Exchange，动态数据交换)技术。Word本身是个支持OLE的服务器程序，通过OLE技术把Word文件的内容在其他支持OLE的客户端程序上进行显示或编辑。因此，通过Delphi7.0可以灵活操作控制Word。用Word2003编辑维护试题图文信息，需要解决以下问题：如何进行试题图文信息的存储、读取以及试题记录中其他字段与图文内容的同窗口同步更新和显示。采用OLE嵌入Word对象方式，以用户可非常熟悉的Word环境作为试题图文内容编辑工具,对试题进行编辑维护；将Word编辑的试题图文内容以图形方式进行显示，实现图文内容与试题基本信息的同窗口同步更新显示浏览，避免了通过激活OleContainer控件方式进行Word文档内容显示，界面友好，浏览方便。 2、具体设计过程及关键技术方法 由于许多学科中都涉及到含有图文信息的试题内容和参考答案，因此可以将试题内容、参考答案分成两类：一类为纯文本型；另一类为图文型。对纯文本型内容采用RichEdit控件进行文本内容的编辑显示,并保存到Access2003数据库的Memo字段中；对图文型内容，由于OLE对象能存储任何文本、图片、声音、动画，甚至程序，因此采用OleContainer控件嵌入Word方式进行图文信息编辑，使用时只需激活OleConiainer直接启动Word文档进行编辑，图文信息保存到Access2003数据库的“OLE对象”字段中。在设计中，图文内容编辑维护设计为一个窗体，实现Word操作和编辑存储数据,图文内容的浏览显示与试题基本信息显示设计为一个窗体。具体程序设计如下： 2.1新建一个窗体,作为图文内容编辑维护窗体,其Name属性设为：Frm_Word; 2.2放置1个MainMenu部件，3个Tpanel组件，Name属性分别设为：mmWord,pnl_Control, pnl_ocWord, pnl_ShapeStatus。在pnl_Control上放置几个button，作为窗口工具栏；在pnl_ocWord上放置OleContainer 部件，设置其Align为alClient；AllowActiveDoc为true；AllowInPlace为True；Name 为olecntr_Word；OldStreamFormat为True。由于OleContainer部件以嵌入方式运行Word服务程序时，会自动占用整个客户区，可将pnl_Control的Align设为alTop、Locked设为True；pnl_ocWord的Align设为alClient；pnl_Status的Align设为alBottom、Locked设为True,从而避免窗口的不同区域被Ole服务程序占用。运行期效果图如图1所示。 2.3图文内容编辑和数据存储的部分关键代码如下： 2.3.1 以嵌入方式创建空白Word文档，并隐藏隐藏Word的部分工具栏； Procedure TFrm_Word.CreateOleWordDoc; Var iBarCnt:integer; begin try olecntr_Word.CreateObject(word.document,true); olecntr_Word.run; oleApp:=Olectnrwd.OleObject; for iBarCnt:=3 to 10 do//隐藏Word的部分工具栏， oleAmandbars.item[iBarCnt].visible :=false; oleApp:=unassigned; except ShowMessage(‘OLE错误，不能创建Word文档’); end; end; 2.3.2