登陆注册
16017000000031

第31章 数据库应用程序设计(5)

窗体及组件的属性设置如表12-4所示。

2)程序代码

(1)在Unit1单元文件的implementation段中加入usesUnit4;(2)根据功能要求,鼠标单击程序主界面【借出图书查询】菜单命令,打开图12-39所示的【借出图书查询】窗口,因此Unit1单元文件的TMainForm.NjccxClick(Sender:TObject)事件处理代码如下:

(3)查询功能的实现

从【查询关键字选择】组合框中选择查询的关键字,在【查询关键字设置】编辑框中输入相应的关键字参数,然后单击【查询】按钮,则数据网格中列出按选定关键字查询的结果。

【查询】按钮的事件处理代码如下:

(4)返回功能的实现

用鼠标单击【返回】按钮,关闭【借出图书查询】窗口,显示程序主窗口。【返回】按钮的事件处理代码如下:

4.出借图书

1)程序界面

【出借图书】窗体如图12-40所示。

图中,数据网格列出当前在库的图书,读者只能从中借阅自己需要的图书。因在库图书数量大,可先通过筛选缩小借阅图书查找的范围,在【在库图书筛选】成组框的编辑框中输入相应的筛选关键字,然后单击【筛选】按钮,数据网格中列出经筛选的在库图书。

找到读者需要的图书,用单击网格单元,所选图书的编号显示在【出借图书操作】成组框中的【出借图书编号】编辑框中;在【读者借书证号】编辑框中,输入借书者的借书证号;在【借书日期】日期时间组件中选择借书的日期,然后单击【出借】按钮,读者选中的图书被借走,在库图书减少。

窗体及组件的属性设置如表12-5所示。

2)程序代码

(1)在Unit1单元文件的implementation段中加入usesUnit5;(2)根据功能要求,单击程序主界面【出借图书】菜单命令,打开图12-40所示的【出借图书】窗口,因此Unit1单元文件的TMainForm.NcjtsClick(Sender:TObject)事件处理代码如下:

(3)筛选功能的实现

在【在库图书筛选】成组框的编辑框中输入相应的筛选关键字,然后单击【筛选】按钮,数据网格中列出经筛选的在库图书。【筛选】按钮的事件处理代码如下:

(4)从“数据网格中选择借阅图书”功能的实现

当从数据网格中找到所需图书时,单击相应的数据网格单元,所选图书的编号显示在【出借图书操作】成组框中的【出借图书编号】编辑框中,“单击数据网格单元”的事件处理代码为:

(5)出借功能的实现

在【读者借书证号】编辑框中,输入借书者的借书证号;在【借书日期】日期时间组件中选择借书的日期,然后单击【出借】按钮,读者选中的图书被借走,在库图书减少。单击【出借】按钮的事件处理代码为:

(6)返回功能的实现

用鼠标单击【返回】按钮,关闭【出借图书】窗口,显示程序主窗口。单击【返回】按钮的事件处理代码如下:

5.归还图书

1)程序界面

【归还图书】窗体如图12-41所示。

图12-41中,数据网格列出当前借出的图书,从中选择归还的图书。因借出图书数量大,可先通过筛选缩小借出图书查找的范围,在【借出图书筛选】成组框的编辑框中输入相应的筛选关键字,然后单击【筛选】按钮,数据网格中列出经筛选的借出图书。

找到要归还的图书,用鼠标单击网格单元,所选图书的编号和读者的借书证号分别显示在【归还图书操作】成组框中的【归还图书编号】和【读者借书证号】编辑框中,然后单击【归还】按钮,选中的图书归还,该图书变为在库。

窗体及组件的属性设置如表12-6所示。

2)程序代码

(1)在Unit1单元文件的implementation段中加入usesUnit6;(2)根据功能要求,鼠标单击程序主界面【归还图书】菜单命令,打开图12-41所示的【归还图书】窗口,因此Unit1单元文件的TMainForm.NghtsClick(Sender:TObject)事件处理代码如下:

(3)筛选功能的实现

在【借出图书筛选】成组框的编辑框中输入相应的筛选关键字,然后单击【筛选】按钮,数据网格中列出经筛选的在库图书。【筛选】按钮的事件处理代码如下:

(4)从“数据网格中选择归还图书”功能的实现

当从数据网格中找到归还图书时,单击相应的数据网格单元,所选图书的编号和读者的借书证号分别显示在【归还图书操作】成组框中的【归还图书编号】和【读者借书证号】编辑框中,“单击数据网格单元”的事件处理代码为:

(6)返回功能的实现

用鼠标单击【返回】按钮,关闭【归还图书】窗口,显示程序主窗口。单击【返回】按钮的事件处理代码如下:

6.图书登记

1)程序界面

【图书登记】功能模块窗体如图12-42所示。

在窗体的各个输入框中,直接输入或选择登记图书的有关信息,然后单击【登记】按钮,该图书登记入册。图书登记操作完毕,单击【返回】按钮返回。

该窗体的单元文件名为Unit7.pas。

窗体及组件的属性设置如表12-7所示。

2)程序代码

(1)在Unit1单元文件的implementation段中加入usesUnit7;(2)根据功能要求,鼠标单击程序主界面【图书登记】菜单命令,打开图12-42所示的【图书登记】窗口,因此Unit1单元文件的TMainForm.NtsdjClick(Sender:TObject)事件处理代码如下:

(3)登记功能的实现

在窗体的各个输入框中,直接输入或选择登记图书的有关信息,然后单击【登记】按钮,该图书登记入册。【登记】按钮的事件处理代码如下:

(4)返回功能的实现

图书登记操作完毕,用鼠标单击【返回】按钮,关闭【图书登记】窗口,显示程序主窗口。单击【返回】按钮的事件处理代码如下:

7.读者登记

1)程序界面

【读者登记】功能模块的窗体如图12-43所示。

在窗体的各个输入框中,直接输入或选择登记读者的有关信息,然后单击【登记】按钮,该读者登记入册。读者登记操作完毕,单击【返回】按钮返回。

该窗体的单元文件名为Unit8.pas。

窗体及组件的属性设置如表12-8所示。

2)程序代码

(1)在Unit1单元文件的implementation段中加入usesUnit8;(2)根据功能要求,鼠标单击程序主界面【读者登记】菜单命令,打开图12-43所示的【读者登记】窗口,因此Unit1单元文件的TMainForm.NdzdjClick(Sender:TObject)事件处理代码如下:

(3)登记功能的实现

在窗体的各个输入框中,直接输入或选择登记读者的有关信息,然后单击【登记】按钮,该读者登记入册。【登记】按钮的事件处理代码如下:

(4)返回功能的实现

读者登记操作完毕,用鼠标单击【返回】按钮,关闭【读者登记】窗口,显示程序主窗口。单击【返回】按钮的事件处理代码如下:

8.退出系统

单击【退出系统】菜单命令,图书管理系统退出,程序主界面关闭。【退出系统】菜单命令处理代码为:

12.5QReport组件组和报表的制作

报表是进行数据统计、分析的常用工具。在数据库应用程序中,经常需要制作报表。Delphi提供了一组制作报表的组件,使程序员可以很方便地制作报表。本节介绍这组组件的使用和报表的制作。

12.5.1QReport组件组

Delphi提供的一组制作报表的组件,位于Delphi集成开发环境组件模板的QReport选项卡中。

1.QuickRep组件

QuickRep组件是制作报表的基本组件,构成整个报表的框架,放置到窗体上的QuickRep组件如图12-44所示。

1)QuickRep组件的属性

QuickRep组件的属性主要有以下几个。

(1)Bands属性

同类推荐
  • SEO智慧

    SEO智慧

    本书不仅是系统讲述搜索引擎优化(SEO)的原理、技法、思维、经验的畅销作品,而且论述了市场学、营销学、心理学怎样与搜索营销形成综合战略的经典著作。从说明网站的搭建该怎样围绕搜索引擎优化开始,到网站优化的具体策划和技术细节,再到搜索营销的持续开展,说明打造投资回报率高的网站应该怎样具备必需的搜索营销思维和战略做法,是作者12年网站营销经验,特别是搜索引擎优化(SEO)实现营销方面的技术和实践总结。
  • 体感交互技术

    体感交互技术

    本书提出了体感计算的研究,探讨了基于体验性认知的个性化电子学习方式,并且分析了面向儿童的艺术创造体验,在体感虚拟化身的帮助下,用户可以通过身体运动,促进情感心智的全面发展,
  • 云计算和现代远程教育

    云计算和现代远程教育

    本书介绍了云计算知识、云计算的特性、云计算技术、云计算中的访问云、云计算中的云存储、云计算在远程教育中的应用等内容。
  • 组态软件控制技术

    组态软件控制技术

    监控组态软件是完成数据采集与过程控制的专用软件,它以计算机为基本工具,为实施数据采集、过程监控、生产控制提供了基础平台和开发环境。本书从应用角度出发,详细介绍了组态软件应用程序的开发过程。对窗口界面编辑、动画链接、实时和历史趋势、安全机制、I/O设备连接,以及生产应用等内容都做了非常详细的介绍。MCGS是优秀的监控组态软件之一,它功能强大、使用方便,可以非常容易地实现监视、控制、管理的各项功能,并可提供软、硬件的全部接口,方便、快速地进行系统集成,构成不同需求的数据采集与监控系统。本书可作为高等学校计算机应用、自动控制、电子技术、机电技术专业的教材,同时还可作为相关专业工程技术人员的自学用书。
  • 办公设备使用与维护

    办公设备使用与维护

    信息技术的发展正前所未有地改变着人类生活的每一个层面,以信息化、全球化和高科技为特征的新经济浪潮滚滚而来,机遇与挑战并存。办公自动化是信息化时代最重要的标志之一,办公要实现自动化,当然离不开办公设备。
热门推荐
  • 无敌佛魔

    无敌佛魔

    有这么一个辽阔的世界,那里五彩斑斓,鸟语花香!那里没有通讯,没有机器,没有科技……因为那里只有传奇,只有开天辟地,只有恩怨情仇,只有江湖。在这传奇世界里,只要你有力量,你就是主宰,就能得到想要的一切包括权利,美人,你就是规则……且看一个外来人是如何挥挥手搅动这世界的……
  • 超凡传奇

    超凡传奇

    公元1970年,许多科学家联合发表超凡理论:1.生物的神经系统足够发达时,可控制细胞生命活动。例如有些生物可让细胞凋亡、复制、分化,从而改变自身形态。他们就是神话传说中所谓的神。2.生物的神经系统更加发达时,可激发能量场。能量子在能量场中受能量力而移动,特定排列形成微观粒子,进而产生物理化学效应。这就是神话传说中所谓的法术。3.能量子会产生能量场,所以物质周围便有能量场。能量子在地球能量场作用下,有极小概率直接形成智能生命。他们就是神话传说中所谓的天道在人间显化。
  • 学生精品美文:网人往事并不如烟

    学生精品美文:网人往事并不如烟

    本书是近几年中国社会各种热点,焦点的集大成者,又可谓是最鲜活的“网络史记”。作者狸美美是资深香港媒体人,又是个地地道道的北京“土著”,视角独特,行文精当,虽是专栏小事,她却写得大气、幽默。更难得的是,作者浸淫纸媒与电媒多年,既有一位“主流媒体”的操守,又有一个“网络高手”的通达,能把这二者结合起来的作者不多。能第一次结集其文在内地出版,亦实可谓是一件幸事、好事。这是一本可遇而不可求的书!
  • 剑象风云

    剑象风云

    进入上古矿洞,偶得传承神药,终于突破血脉的枷锁!神秘灰色气流自‘门’中降临,解开被诅咒的血脉!少年六年不鸣,一鸣,自当惊天!且看他如何在血雨腥风中:成就剑象,玩弄风云!!…………………………………………………………………………新书等级设定。。炼体、纳元、培元、凝剑、汇灵、粹魂、固胚、剑纹、剑象。ps:不知道有没有人看,不过还是建了一个群276680591.呵呵,请各位多多支持落子!收藏+推荐就是对落子最大的的肯定!
  • 迷花不语

    迷花不语

    木溪予老家院子里有颗大树,不知是什么品种,也不知何时开始生长,只知道它常年开花,夏天是星星点点的白色,冬日是温暖璀璨的红色。可是当她上次回去的时候,花却谢了
  • 云端鬼城:鬼君我们去看看

    云端鬼城:鬼君我们去看看

    我,林家大小姐,林梦雨!可虽是大小姐,我的麻烦还真不多……反而,我身边形形色色的人的麻烦不知比我多上多少倍!我解决的不只这些人的麻烦,还有鬼的麻烦,顺带把鬼也解决掉。当然少不了我的两个助手——颜凌翼,颜凌霜!经常抢我的俩兄弟!拥有半鬼之身的他们,常常被人误以为是鬼。不过,我似乎对他们渐渐有了不一样的感情呢……
  • 穿越战神联盟,为和平而战

    穿越战神联盟,为和平而战

    在奇妙的世界里,在神秘的宇宙里,原来还有这样有义气,有情义的联盟,原来还有这样一个神奇而又有意思的大飞船,这里的所有人都是一家,我们背上的重任不只是保护兄弟,而是维护宇宙和平,保护家人,保护最亲密的人。这里是传奇的赛尔号,我们,就是传说中的战神联盟!
  • 做最好的副手

    做最好的副手

    做最好的副手讲述在一个组织或企业的内部领导班子中,副手既是一个重要角色,同时也是一个比较特殊的角色,其权力不是很大,但却是组织的骨干,发挥着承上启下、分工负责的关键作用。而且,在领导学中,也非常讲究副手的辅助之道,即如何配合一把手更好地把工作做到位,凡精于此道的副手总能站得恰到好处,赢得一把手的赞誉,否则,就可能丢掉自己的位置。做最好的副手一书对副手该如何认知自己的角色和定位,如何提高自己的能力和素质,如何配合好一把手的工作,如何处理与同级副手的关系,如何处理和统御下属的诀窍及方法等作了详尽细致的介绍,这为所有的副手们解析了将来的发展之路,让他们能够更加清晰地看清自己前进的方向。
  • 混世书生修仙记

    混世书生修仙记

    一个在妓院长大的读书人,机缘巧合被带到修仙界,因为没有灵根,流落到修仙城中自生自灭,他仗着一分坚韧,以儒家格物术为基,获得了推演阵法、功法、丹药乃至天道法则的超级能力,从此以狂者精神证道,与人斗其乐无穷,爽事不断,与天斗其乐无穷爽事不断。觉得好看就收藏一个,谢谢了。
  • 驭兽女王

    驭兽女王

    再次醒来,她成为七岁稚女。与孪生哥哥相依为命,被毒打、被抛到乱葬岗上。命不该绝,她与哥哥被神秘隐世高手所救。开始新的人生。再次出世,七岁女娃已然成为绝美少女。骑着白虎、吹着玉萧,领着千军万兽横扫江湖。欠他们兄妹债的人一个也休想逃。血债血还,敢动她最在乎的人,就要有死的觉悟。她罩的人,愿以命相护。她的敌人,弑杀不绝不罢休。惹她,必死;惹她哥哥,让你生不如死。……驭兽女一出,引无数美男竞折腰。他说:能配得上你的人只有我。(沐月离)他说:一生一世一双人,我只要你。(云绝尘)他说:不能相爱,但求永相随。(欧阳安)……一个个美男登场,一场身世之谜也拉开。她竟不是将军的女儿,那么,她是谁?http://www.56.com/p88/v_OTc3NDgzNjU.html&pstyle=1