(2)内审处理决定统计表：包括建议内审处理决定和实际内审处理决定，它也是按照时间来统计的。统计表包括了银行类型、单位、人员、警告、记过、记大过、降职、撤职、开除、移交纪检监察部门查处(人数)、移送司法机关(人次)、其他、年度等，用户同样可以把统计出来的结果转换为Excel报表，方便用户进行编辑和打印。

(1)对项目进行批示：在行长了解了项目的基本情况和进行情况后，可以对该内审项目进行批示，决定是否通过项目提案或提出观点和修改意见。

(2)对文档进行批示：行长对项目中打开的Word文档形式的内审项目有进行批示的权利。在文档查看窗口中可以决定是否通过文档审定并发出批示信息。

整个界面尽量满足用户能控制整个系统的运行，类似Win98/2000的资源管理器，具有菜单、工具栏、树形目录等。

数据库结构设计就是设计系统的数据库文件，根据设计的要求，综合考虑数据间的关系。确定应该建立哪些数据库文件，以及每一个数据库文件结构。下面介绍一下本系统有几张核心表：

(1)项目表：该表存放项目基本信息，也就是在立项阶段已经确定下来的一些数据，这些数据在本系统中将会在查看项目列表、查询项目等模块时用到，另外在内审项目工作程序中要替换模板标签的数据也来源于此。表中的项目编号是该表的主键，同时也是贯穿整个应用程序的关键字段，同时表中还有内审项目名称、时间、被审查单位等其它基本字段。

(2)文档表：该表存放内审文档。其中的aduit_id将是项目表的外键，用来唯一标注内审文档属于哪一个项目。其中的Adoc_type用来标识内审文档的类型，标识属于内审通知书、内审工作底稿、事实确认书等内审档案的哪一种。Adoc_bcontent是本表的关键字段，该字段是所谓的blob字段，既是存放二进制文件的字段，在SQL Server 中的类型是image。顾名思义，该类型字段是用来存放图片等二进制大文件，当然也能够存放Office文档。

(3)模板表：该表中存放内审项目中待用的内审项目档案模板，与文档表实现方式基本相同，用户可以修改内审项目模板及自行扩展内审项目模板。

(4)内审工作量统计表：建议/实际内审处理决定统计表。

这几张表用来存放每次内审项目结束后所产生的统计数据。在本子系统中将使用这几张表的数据，统计一段时期内的合计结果并生成Excel报表。

ADO(Active Data Objects)是微软公司提供的一项技术，通过ADO，我们可以方便地访问各种类型的数据库，本系统开发的重心之一就是利用ADO技术在Access数据库与SQL Server数据库之间存取数据。

ADO对象事实上就是COM对象，因此Delphi的程序员可以直接在Object Pascal中调用Create OLE Object方法来建立原生ADO对象，然后通过再调用ADO对象的方法或存取它的特性值来处理数据。ADO架构由数个不同的ADO对象组成，每一个ADO对象都具备不同的功能，以此帮助程序员处理数据存取工作。

在本程序中多次使用到ADODataSet组件来获取数据。例如在主界面(frm_mail)窗体，在主窗体中为了显示项目列表，使用ADODataSet、DataSource、DBGrid组件等。其中DBGrid组件用来显示列表，DataSource是连接ADODataSet组件与DBGrid组件的桥梁。

在该窗体中ADODataSet组件使用数据模块中的ADO连接组件，并把Connection属性设置为：DataModule1.ADOConnection1。CommandText属性设置为：select * from Audit_proj_tab，这样就可以在 Dbgrid组件里面显示Audit_proj_tab表中的所有内容。

此外，用户进入系统后，也可以通过树形目录按归档项目、未归档项目对项目进行分类显示，每个项目又可以分为常规内审、专项内审、专案内审、离任内审、其他内审，用户通过点击它就可以在右边的Dbgrib组件显示出来，其实这也是应用了ADODataSet组件所达到的作用，下面只给出树形目录其中的’未归档项目’的实现代码：

procedure Tfrm_main.TreeView1Change(Sender: TObject; Node: TTreeNode);

var

   sroot_f,sroot:string;                   //定义一个父类和子类变量

begin

sroot:=treeview1.Selected.Text;            //把当前鼠标所指中的数节点的字符内容赋值给srrot

if treeview1.Selected.Parent=nil then        (责任编辑：南粤论文中心)转贴于南粤论文中心: http://www.nylw.net(南粤论文中心__代写代发论文_毕业论文带写_广州职称论文代发_广州论文网）