Delphi 数据库开发：职员奖惩管理功能

——此文章摘自《Delphi 数据库开发经典案例解析》定价 ￥特价 ￥购买>>//track linktech cn/?m_id=dangdang&a_id=A &l= &l_type = width= height= border= nosave>

　职员的奖励和惩罚功能在实质上是一样的 不同之处只是所面对的数据表而已 它主要用于对职员的奖励 惩罚进行输入和修改 删除等操作 这两个功能都非常简单

　在职员奖励管理页面上放置 个Label控件 他们的属性如图 所示 数据库链接控件按照表 的说明设置其属性

//develop csai cn/delphi/images/ jpg >图 职员奖励管理页控件设置

//develop csai cn/delphi/images/ gif >表 职员奖励管理页控件及属性设置

　至此我们完成了职员奖励管理功能 在这个页面中我们并没有使用DBGrid控件 而是直接把数据表内所有字段的值都读入到了与数据表内各个字段所对应的DBEdit控件内 这样仍然可以在DBEdit中直接修改或者添加职员奖励的数据 利用数据导航条控件(DBNavigator)可以在各条数据之间移动 并可以利用这个控件所提供的插入 删除 添加 修改等一系列功能来对数据表进行操作 读者可以由此了解到 在用Delphi编写数据库应用程序时 并不是只有DBGrid控件可以用来从数据表中读出并显示数据 其他控件如DBEdit DBText等也可以胜任 只不过DBGrid的表格形式更为常用而已 运行结果如图 所示

　惩罚管理功能和职员奖励管理功能是一样的 只有所对应的数据表不同而已 读者可以参考职员奖励管理功能的实现和光盘中的代码 把数据表由职员奖励表改为职员惩罚表 把页面上的奖励类型 奖励金额等标签改为惩罚类型 惩罚金额等相对应的标签 然后即可自行完成职员惩罚管理的内容 本章中就不再赘述

lishixinzhi/Article/program/Delphi/201311/24836