2010年08月18日

1.点我名的人以后一定能去极乐净土!!!
2.为我挂掉的手机默哀3分钟。
3.1楼的蜘蛛好像又肥了一点。
4.健身馆居然来了个小姑娘,在一群光膀子的男人里面锻炼画面真和谐。
5.练了这么久感觉肚子还是没完全消失,革命尚未成功同志任需努力。
6.不怎么玩游戏后感觉时间大把大把的出来了,有更多的时间陪亲爱的,不过亲爱的不在偶尔也会寂寞啊。
7.不知道蟑螂和蜘蛛打架谁会赢呢?
8.胸毛不是可再生资源请大家善待!
9.攒钱不容易,会花钱也不易啊~
10.老妈你的牌技能长进点吗~~~ 帮你充点充的我手酸啊!
11.突然发现我的电脑音箱居然是8年前的~声音还不错,或者说我压根分辨不出~
12.太阳来的更猛烈点吧,我需要光合作用!
13.想去一次尼泊尔啊。
14.戒烟戒酒身体好。
15.健康心灵寄宿在健康的身体,邪恶的灵魂寄宿在邪恶的身体。(邪恶的身体是怎么样的,估计是满身触手那种类型吧。)

2007年12月30日

从前有一个叫阿木的恶魔非常非常希望过上人类的生活,但是阿木的外表无法去过人类的生活,他如果想过人类的生活就必须变成人类,而的方法只有一个就是吃掉一个人类变成那个人类,阿木来到小镇碰到了一个快乐的铁匠,阿木看到铁匠于是问你为什么这么开心,铁匠乐呵呵的回答说因为我可以开心的工作每天都有事做,所以生活的很开心。阿木想这不就是我想要过的人类生活吗于是叽里咕噜、稀里哗啦把铁匠吃掉了,变成了铁匠过上了人类的生活,每天幸福快乐的生活着,一天一个富翁来到铁匠阿木的面前,看着穿着豪华并坐着马车的富翁非常得意的走着。阿木就问你为什么这么得意。富翁说我有许多金钱可以买我想要的别人没有的东西,当然应该得意了。铁匠阿木想这才是人类的生活吗?于是叽里咕噜、稀里哗啦把富翁也给吃掉了,变成了富翁。过上了富翁的生活的阿木体会到了得意,一天富翁阿木遇见了国王的大臣,大臣带着许多卫兵路上的人们都很害怕,于是富翁阿木就问大臣他们为什么怕你,因为我拥有权利,可以使人畏惧的权利。富翁阿木想这也许才是人类的生活。于是叽里咕噜、稀里哗啦的把大臣吃掉了。当上了大臣的阿木过上了大臣的生活,一天大臣阿木到了皇宫见到了国王,国王很威严,而且可以支配国家里所有的事,但是却不开心。大臣阿木问国王你为什么不开心,国王说道我是这个国家最伟大的人所以我已经没有追求了,大臣阿木想人类生活的极致难道就是国王于是又叽里咕噜、稀里哗啦吃掉了国王,变成了国王的阿木体会到了站在顶端的生活,渐渐的国王阿木想到难道这就是我追求的人类生活,在不断的思考中阿木不断的厌恶人类的生活,终于国王阿木不想在做国王了他开始吃其他人类,每吃掉一个人类都会过上一种新的生活,但每次过不久阿木都会厌烦,直到有一天恶魔阿木把世界上的人类全吃掉了,在空荡的世界上恶魔阿木孤独的一个人在那里走着,带着失落的心情,它想人类的生活难道就是这样吗?我所希望过的生活就是这样的吗?突然他发现了一个熟悉的身影出现在眼前,这时恶魔阿木发现那个身影是个恶魔,恶魔阿木看到了恶魔于是叽里咕噜、稀里哗啦的把恶魔吃掉了,终于恶魔阿木找到了自己应该有的形态,这是恶魔阿木发现自己所想过的生活只不过是追寻希望的过程。

2006年12月14日

今天突然想起了一段话 “人生匆匆几十年,我从来没有想过能够有什么好下场,如果还让我有来世我也会做同样的事。” 这样看似一句死不悔改的话语,却是反映了我的想法,如果我还有来世我也不会后悔我今生做过的一切。

2006年04月10日

已经很多年没有写过东西,今天我想写些什么,与其说写什么不如说是发泄

,让我用文字尽情的发泄着心中的苦闷。
    从出生到现在二十多个年头了,可能我已经懂得了很多但也许我只是个什么

都不懂的傻瓜,二十岁了不管我是什么我都要接受这个世界的洗礼。我讨厌死板

刻薄的教育,我讨厌别人对我的命令,我天生就有着与众不同的叛逆,我所想做

的是我所能做到的事,我不是这个社会的精英,我也不是无药可救的混蛋,我不

祈求生活能够有多好,我只希望能够拥有自己的世界,我不在乎别人的看法,因

为我不想改变任何人,那我的下场是不是改变我自己,我不知道,我希望在几十

年后我身上还能拥有独一无二的东西。
    我的父亲是一个曾经当过老师的人,也许很多人都认为他很失败,一个教育

者他的儿子却不能被培养成一个有作为的人,但我心里很清楚我父亲教我最重要

的东西就是做人的道理,做一个堂堂正正人的道理,所以我尊敬我的父亲。我的

母亲是个很好的人但她的思想和我有着很大差异,很多时候我认为需要注意或严

重的事她却觉得不值一提,或许十年二十年后她会发现她的儿子是对的。
    我常常和别人说道理,我的朋友都认为我如果去做哲学家一定会成功,其实

他们不知道,我的道理都是说给自己听的,人是很奇怪的动物,他们明明知道很

多道理却不能够遵守,有很多时候如果你并没有什么作为那么你说出来的道理就

是放屁。为什么?很简单你如果懂道理为什么你自己怎么没有什么作为,这不是

扯蛋放屁是什么。所以我的道理都是说给自己听的我要时刻记着自己所说的话告

诉自己你懂这些,你是个明白人,哲学家我做不了,没有那个哲学家是把道理说

给自己听的。
    我所经历的耻辱和荣誉,我所憎恨的和我所喜爱的人们,这一切都是我生命

中所包含的一部分,让我记住着所有的所有,当我死的时候我还能清楚的记着这

些我想人生最大的幸福莫过于此。

2006年03月15日

摘  要
本系统主要完成对图书仓库的库存管理,包括图书入库、出库、库存,员工信息,供应商信息以及密码管理等六个方面。系统可以完成对各类信息的浏览、查询、添加、删除、修改、报表等功能。
系统的核心是入库、库存和出库三者之间的联系,每一个表的修改都将联动的影响其它的表,当完成入库或出库操作时系统会自动地完成库存的修改。查询功能也是系统的核心之一,在系统中即有单条件查询和多条件查询,也有精确查询和模糊查询,系统不仅有静态的条件查询,也有动态生成的条件查询,其目的都是为了方便用户使用。系统有完整的用户添加、删除和密码修改功能,并具备报表打印功能。
系统采用microsoft office中的access 2000来设计数据库,并使用当前优秀的开发工具—delphi 6.0 ,它有着最为灵活的数据库结构,对数据库应用有着良好的支持。
论文主要介绍了本课题的开发背景,所要完成的功能和开发的过程。重点的说明了系统设计的重点、设计思想、难点技术和解决方案。

关键字:数据库,sql语言,delph 6,数据库组件,仓库管理

 


 
 
目  录

第一章 引言 ……………………………………………………………………………1
1.1  课题来源 ……………………………………………………………………1
1.2  开发工具的选择  ……………………………………………………………2
1.3  所做的主要工作  ……………………………………………………………3
第二章 数据库概论 ……………………………………………………………………4
2.1  数据库的发展  ………………………………………………………………4
   2.1.1  数据库的发展 …………………………………………………………4
   2.1.2  数据库阶段的特点 ……………………………………………………5
   2.1.3  数据库技术 ……………………………………………………………6
2.2  数据库理论基础  ……………………………………………………………7
   2.2.1  数据库模型 ……………………………………………………………7
   2.2.2  数据库体系结构    ……………………………………………………10
   2.2.3  数据的独立性  ………………………………………………………11
   2.2.4  范式  …………………………………………………………………11
2.3  sql语言基础   ……………………………………………………………13
   2.3.1  sql简介  ……………………………………………………………13
   2.3.2  sql查询    ……………………………………………………………13
   2.3.3  sql数据更新    ………………………………………………………14
第三章数据库开发工具  ……………………………………………………………16
3.1  delphi 6.0 简介  ……………………………………………………………16
3.2  delphi 6.0 控件  ……………………………………………………………17
3.2.1  ado数据访问组件   …………………………………………………17
   3.2.2  数据控制类datacontrol    ……………………………………………18
   3.2.3  数据访问类dataaccess     ……………………………………………18
   3.2.4  sql语言在delphi中的应用    ………………………………………19
3.3  access 简介    ………………………………………………………………21
第四章 系统总体设计   ………………………………………………………………23
4.1 系统需求分析     ……………………………………………………………23
4.2 系统概要设计     ……………………………………………………………25
   4.2.1  系统结构设计    ………………………………………………………25
   4.2.2  数据库设计    …………………………………………………………27
       4.2.2.1  er图设计  ……………………………………………………27
       4.2.2.2  数据库表格设计………………………………………………29
4.3系统详细设计………………………………………………………………34
第五章 系统应用程序设计  …………………………………………………………37
5.1  系统窗体模块组成…………………………………………………………37
5.2  数据模块窗体设置…………………………………………………………38
5.3  主窗体功能模块的实现……………………………………………………39
5.4  入库、出库窗体模块的实现………………………………………………43
5.5  查询功能的实现……………………………………………………………51
5.6  系统登陆窗体模块的实现…………………………………………………52
5.7  用户管理功能的实现………………………………………………………54
   5.7.1  用户管理主窗体  ……………………………………………………54
5.7.2  密码修改窗体模块的实现    …………………………………………54
   5.7.3  用户注册窗体模块的实现    …………………………………………55
   5.7.4  用户注销窗体模块的实现    …………………………………………57
结束语 …………………………………………………………………………………59
致谢 ……………………………………………………………………………………60
参考文献 ………………………………………………………………………………61
第一章    引  言 
§1.1   课题来源
随着社会经济的迅速发展和科学技术的全面进步,计算机事业的飞速发展,以计算机与通信技术为基础的信息系统正处于蓬勃发展的时期。随着经济文化水平的显著提高,人们对生活质量及工作环境的要求也越来越高。书籍做为人类的精神食粮,在现代社会中越来越受到重视,大量的书籍出现在市场上,人们有了各种各样不同的选择。与此同时,为了管理大量的图书,图书仓库也大量的出现,仓库的管理问题也就提上了日程。随着图书的大量增加,其管理难度也越来越大,如何优化仓库的日常管理也就成为了一个大众化的课题。
在计算机飞速发展的今天,将计算机这一信息处理利器应用于仓库的日常管理已是势必所然,而且这也将为仓库管理带来前所未有的改变,它可以带来意想不到的效益,同时也会为企业的飞速发展提供无限潜力。采用计算机管理信息系统已成为仓库管理科学化和现代化的重要标志,它给企业管理来了明显的经济效益和社会效益。主要体现在:
极大提高了仓库工作人员的工作效率,大大减少了以往入出存流程繁琐,杂乱,周期长的弊端。
基于仓库管理的全面自动化,可以减少入库管理、出库管理及库存管理中的漏洞,可以节约不少管理开支,增加企业收入。
仓库的管理的操作自动化和信息的电子化,全面提高了仓库的管理水平。
随着我国改革开放的不断深入,经济飞速的发展,企业要想生存、发展,要想在激烈的市场竞争中立于不败之地,没有现代化的管理是万万不行的,仓库管理的全面自动化、信息化则是其中极其重要的部分。为了加快仓库管理自动化的步伐,提高仓库的管理业务处理效率,建立仓库管理系统已变得十分心要。
入库、库存、出库还是现在企业图书仓库管理的常规基本模式,虽然,最近又出现了很多新的管理模式,如:基于零库存思想的沃尔玛特管理方式,但这些新的思想在中国大部分企业的管理中还是难以实现的。所以如何设计好仓库管理系统,尽可能地减少仓库管理的重复性和低效性就成为当前最为重要的问题。图书仓库管理的核心是入库、库存和出库之间的联系,如何处理好三者之间的关系是系统最为关键的部分。另外,员工信息和供应商信息管理也是仓库管理中一个必不可少的部分,它提供着与入库和出库相关的地一些信息,使得整个系统更加完整,更加实用。
通过对仓库管理日常工作的详细调查,搜集了大量的资料,从系统结构的组织,功能的实现,技术的要求以及可行性等多方面进行考虑,认为本课题是一个适应现今图书仓库管理需求的计算机信息管理系统,具有一定的实际开发价值和使用价值。
§1.2 开发工具的选择
自java诞生以来,随着internet技术的普及和应用需求的变化,以第四代语言为主的应用开发产品发生了较大的变化,它们不仅已成为人们开发应用的开发工具,而且很多产品已发展成为一种强有力的应用开发环境。这些新型的开发工具通常以一种集成软件包的形式提供给开发人员,被称为studio(工作室)或suite(程序组)。例如,微软的visual studio 6.0,borland公司的delphi 6.0等数据库辅助开发工具。
 现在,市场上可以选购的应用开发产品很多,流行的也有数十种。目前在我国市场上最为流行、使用最多、最为先进的可用作企业级开发工具的产品有:
microsoft公司的visual basic 6.0版
microsoft公司的visual c++6.0版
borland公司的delphi 6.0版
在目前市场上这些众多的程序开发工具中,有些强调程语言的弹性与执行效率;有些则偏重于可视化程序开发工具所带来的便利性与效率的得高,各有各的优点和特色,也满足了不同用户的需求。然而,语言的弹性和工具的便利性是密不可分的,只有便利的工具,却没有弹性的语言作支持,许多特殊化的处理动作必需要耗费数倍的工夫来处理,使得原来所标榜的效率提高的优点失去了作用;相反,如果只强调程语言的弹性,却没有便利的工具作配合,会使一些即使非常简单的界面处理动作,也会严重地浪费程序设计师的宝贵时间。
而delphi是一个非常理想选择。delphi 6 是操作系统中快速应用开发环境的最新版本。它也是当前windows平台上第一个全面支持最新web服务的快速开发工具。无论是企业级用户,还是个人开发者,都能够利用delphi 6 轻松、快捷地构建新一代电子商务应用。delphi 6 是惟一支持所有新出现的工业标准的rad环境,包括xml(扩展标记语言)/xsl(可扩展样式语言),soap(简单对象存取协议)和wsdl(web服务器描述语言)等。
delphi 6 是可视化的快速应用程序开发语言,它提供了可视化的集成开发环境,这一环境为应用程序设计人员提供了一系列灵活而先进的工具,可以广泛地用于种类应用程序设计。在delphi 6 的集成开发环境中,用户可以设计程序代码、运行程序、进行程序错误的调试等,可视化的开发方法降低了应用程序开发的难度。delphi的基础编程语言是具有面向对象特性的pascal语言,即object pascal 。object pascal具有代码稳定、可读性好、编译速度快等优点,并将面向对象的概念移植到了pascal语言中,使这种基础语言有了新的发展空间。
使用delphi 6.0 ,我们几乎可以作任何事情,还可以撰写种各种类型的应用程序,动态链接库(dll)、con、或corba对象,cgi/isapi程序,microsoft back office应用程序。程序的规模小到简单的个人数据库应用,大到复杂的企业的多层次分布式系统,都可以使用delphi进行开发,其友好的集成开发界面,可视化的双向开发模式,良好的数据库应用支持高效的程序开发和程序运行,备受广大程序开发人员的好评。尤其是delphi对数据库应用的强大支持,大大提高了数据库应用软件开发的效率,缩短了开发周期,深受广大数据库应用程序设计人员的喜爱。delphi为数据库应用开发人员提供了丰富的数据库开发组件,使数据库应用开发功能更强大,控制更灵活,编译后的程序运行速度更快。
§1.3  本文所做工作
引言部分介绍了本系统的课题来源以及对数据库开发工具的选择。
第二章介绍了数据库的发展,关系数据库,数据库体系结构,并系统介绍了sql语言,为设计和理解应用程序做了铺垫。
第三章系统介绍了delphi 6.0及其部分控件,sql语言在delphi 6.0中的应用,以及access等。
第四章是本文的主体,按照软件工程的要求,从需求分析开始,经过概要设计最后到详细设计,完成对整个系统的设计。
第五章根据第四章的设计结果利用access 2000和delphi 6.0进行了具体的窗体和应用程序设计。
总结部分介绍了设计体会和编程体会,并指出了系统设计中的不足和改进的方向
第二章    数据库概论
§2.1     数据库的发展
数据库处理在信息系统的研究中一直是非常重要的主题,然而,近年来,随着world wide web(www)的猛增及internet技术的迅速发展,使得数据库技术之时成为最热门技术之一。数据库技术能使internet应用超越具有早期应用特点的简单的发布。同时,internet技术提供了一种向用户发布数据库内容的标准化的访问方法。这些技术没有脱离经典数据库技术的要求。它们只是加重了数据库技术的重要性。
数据库的设计和开发及包括艺术有包括工程。理解用户的需求,然后,把它们转变为有效的数据库设计是一个艺术过程。把设计转变为实际的数据库,并且这些数据库带有功能完备、高效能的应用,是一个工程过程。
数据库的目的是帮助人们跟踪事务。经典的数据库应用涉及诸如订单、顾客、工作、员工、学生、电话之类的项,或其它数据量较大、需要密起关注的事务。最近,由于数据库的普及,数据库技术已经被应用到了新的领域,诸如用于internet的数据库或用于公司内联网的数据库。数据库也被越来越多地应用于生成和维护多媒体应用程序上。
计算机的数据处理应用,首先要把大量的信息以数据形式存放在存储器中。存储器的容量、存储速率直接影响到数据管理技术的发展。从1956年生产出第一台计算机到现在,存储器的发展,为数据库技术提供了良好的物质基础。
使用计算机以后,数据处理的速度和规模,无论是相对于手工方式,还是机械方式,都有无可比拟的优势。通常在数据处理中,计算是比较简单的而数据的管理却比较复杂。数据管理是指数据的收集、整理、组织、存储、维护、检索、传送等操作,这部分操作是数据处理业务的基本环节,而且是任何数据处理业务中必不可少的共有部分。数据管理技术的优劣,将直接影响数据处理的效率。
2.1.1  数据库的发展
数据管理技术的发展,与硬件(主要是外存)、软件、计算机应用的范围有密切的联系。数据管理技术的发展经过三个阶段:人工管理阶段、文件系统阶段和数据库阶段。
人工管理阶段和文件系统阶段都有着相当多的缺陷,诸如数据冗余性 ,数据不一致性以及数据联系弱等等。也正是由于这些原因,促使人们研究新的数据管理技术,从而产生了数据库技术。
20世纪60年代末发生的三件大事,层次模型ims系统的推出、关于网状模型dbtg报告的发表以及关于关系模型论文的连续发表标志着数据管理技术进入数据库阶段。进入70年代以后,数据库技术得到迅速发展,开发了许多有效的产品并投入运行。数据库系统克服了文件系统的缺陷,提供了对数据更高级更有效的管理。
当进入数据库阶段后,随着数据管理规模一再扩大,数据量急剧增加,为了提高效率,开始时,人们只是对文件系统加以扩充,在应用文件中建立了许多辅助索引,形成倒排文件系统。但这并不能最终解决问题。在20世纪60年代末,磁盘技术取得重要进展,具有数百兆容量和快速存取的磁盘陆续进入市场,成本也不高,为数据库技术的产生提供了良好的物质条件。
2.1.2  数据库阶段的特点
(1)减少数据的重复(redundancy can be reduced)
当在一个非数据库系统当中,每一个应用程序都有属于他们自己的文件,由于无法有系统建立的数据,因此常常会造成存储数据的重复与浪费。例如:在一家公司当中,人事管理程序与工资管理程序或许都会使用到职员与部门的信息或文件,而我们可以运用数据库的方法,把这两个文件整理起来,以减少多余的数据,过度地占用存储空间。
(2)避免数据的不一致(inconsistency can avoid)
本项的特色,可以说是延伸前项的一个特点,要说明这样的一个现象,我们可以从下面这个实例来看:若是在同一家公司当中,职员甲在策划部门工作,且职员甲的记录同时被存放在数据库的两个地方,而数据库管理系统却没有对这样重要的情况加以控制,当其中一条数据库被修改时,便会造成数据的不一致,但是,对于一个健全的数据库管理系统而言,将会对这样的情况加以控制,但有时并不需要刻意消除这种情形,应当视该数据库的需求与效率来决定。                      
(3)数据共享(data shared)
对于数据共享的意义,并不是只有针对数据库设计的应用程序,可以使用数据库中的数据,对于其他撰写好的应用程序,同样可以对相同数据库当中的数据进行处理,进而达到数据共享的目的。
(4)强化数据的标准化(standard can be enforced)
由数据库管理系统,对数据做出统筹性的管理,对于数据的格式与一些存储上的标准进行控制,如此一来,对于不同的环境的数据交换(data interchange)上将有很大的帮助,也能提高数据处理的效率。
(5)实践安全性的管理(security restriction can be applied)
通过对数据库完整的权限控制,数据库管理者可以确认所有可供用户存取数据的合法途径渠道,并且可以事先对一些较重要或关键性的数据进行安全检查,以确保数据存取时,能够将任何不当损毁的情形降至最低。
(6)完整性的维护(integrity can be maintained)
所谓完整性的问题,就是要确认某条数据在数据库当中,是正确无误的。正如(2)所述,若是无法控制数据的不一致性,便会产生完整性不足的问题,所以,我们会发现,当数据重复性高的时候,数据不完整的情形也会增加,当然,若是数据库的功能完整,将会大大地提高数据完整性,也会增加数据库的维护能力与维护简便性。
(7)需求冲突会获得平衡(conflicting requirements can be balance)
在一个较大型的企业当中,用户不同的需求,往往会造成系统或数据库在设计上的困扰,但是一个合适的数据库系统,可以通过数据库管理员的管理,将会有效地整理各方面的信息,对于一些较重要的应用程序,可以适时地提供较快速的数据存取方法与格式,以平衡多个用户在需求上的冲突。
上述七个方面构成了数据库系统的主要特征。这个阶段的程序和数据间的联系可用下图表示: 

 

 

                  

2.1.3  数据库技术
从文件系统发展到数据库系统是信息处理领域的一个重大变化。在文件系统阶段,人们关注的中心问题是系统功能的设计,因而程序设计处于主导地位,数据只起着服从程序需要的作用。在数据库方式下,信息处理观念已为新体系所取代,数据占据了中心位置。数据结构的设计成为信息系统首先关心的问题,而利用这些数据的应用程序设计则退居到以既定的数据结构为基础的外围地位。
目前世界上已有数百万个数据库系统在运行,其应用已经深入到人类社会生活的各个领域,从企业管理、银行业务、资源分配、经济预测一直到信息检索、档案管理、普查统计等。并在通信网络基础上,建立了许多国际性的联机检索系统。我国20世纪90年代初在全国范围内装备了12个以数据库技术为基础的大型计算机系统,这些系分布在邮电、计委、银行、电力、铁路、气象、民航、情报、公安、军事、航天和财税等行业。
数据库技术还在不断的发展,并且不断地与其它计算机技术相互渗透。数据库技术与网络通信技术相结合,产生了分布式数据库系统。数据库技术与面向对象技术相结合,产生了面向对象数据库系统。
在数据库技术中有四个名词,其概念应该分清。
(1)数据库(database,db):db是统一管理的相关数据的集合。db能为各种用户共享,具有最小冗余度,数据间联系密切,而又有较高的数据独立性。
(2)数据库管理系统(database management system,dbms):dbms是位于用户与操作系统之间的一层数据管理软件,为用户或应用程序提供访问db的方法,包括db的建立、查询、更新及各种数据控制。dbms总是基于某种数据模型,可以分为层次型、网状型、关系型和面向对象型dbms。
(3)数据库系统(database system,dbs):dbs是实现有组织地、动态地存储大量关联数据,方便多用户访问的计算机软件、硬件和数据资源组成的系统,即采用了数据库技术的计算机系统。
(4)数据库技术:这是一门研究数据库的结构、存储、管理和使用的软件学科。数据库技术是操作系统的文件系统基础上发展起来的。而dbms本身要在操作系统的支持下才能工作。数据库不仅用到数据结构的知识,而且丰富了数据结构的内容。在关系数据库中要用到集合论、数理逻辑的理论。因此,数据库技术是一门综合性较强的学科。
§2.2数据库理论基础
2.2.1  数据库模型
从20世纪50年代中期开始,计算机的应用由科学研究部门逐步扩展到企业、行政部门。至60年代,数据处理成为计算机的主要应用。数据库技术作为数据管理技术,是计算机软件领域的一个重要分支,产生于60年代末。现已形成相当规模的理论体系和实用技术。
模型是对现实世界的抽象。在数据库技术中,我们用模型的概念描述数据库的结构与语义,对现实世界进行抽象,表示实体类型及实体间联系的模型称为“数据模型” 。
目前广泛作用的数据模型可分为两种类型。
一种是独立于计算机系统的模型,完全不涉及信息在系统中的表示,只是用来描述某个特定组织所关心的信息结构,这类模型称为“概念数据模型” 。要领模型用于建立信息世界的数据模型,强调其语义表达功能,应该概念简单、清晰,易于用户理解,它是现实世界的第一层抽象,是用户和数据库设计人员之间进行交流的工具。这一其中著名的模型是“实体联系模型” 。
另一种数据模型是直接面向数据库的逻辑结构,它是现实世界的第二层抽象。 这类模型涉及到计算机系统和数据库管理系统,又称为“结构数据模型” 。例如,层次、网状、关系、面向对象等模型。这类模型有严格的形式化定义,以便于在计算机系统中实现。
(1)层次模型。用树型结构表示实体类型及实体间联系的数据模型。树的结点是记录类型,每个非根结点有且只有一个父结点。上一层记录类型和下一层记录类型间联系是1∶n联系。
层次模型的特点是记录之间的联系通过指针实现,查询效率较高。但层次模型有两个缺点:一是只能表示1∶n联系,虽然有多种辅助手段实现了m∶n联系,但都较复杂,用户不易掌握,二是由于树型结构层次顺序的严格和复杂,引起数据的查询和更新操作也很复杂,因此,编写应用程序也很复杂。
(2)网状模型。用有向图结构表示实体类型及实体间联系的数据模型。。1969年dbtg报告提出的数据模型是网状模型的主要代表。有向图中的结点是记录类型,有向边表示从箭尾一端的记录类型到箭头一端的记录类型间联系是1∶n联系。
网状模型的特点:记录之间联系通过指针实现,m∶n联系也容易实现(每个m∶n联系可拆成两个1∶n联系),查询效率较高。网状模型的缺点是编写应用程序比较复杂,程序员必须熟悉数据库的逻辑结构。由于层次系统和网状系统的应用程序编制比较复杂,因此,从20世纪80年代中期起,其市场已被关系系统所取代。但是使用这两种模型建立起的许多数据库仍然在正常运转,只是在外层加了个关系数据库语言的接口。网状模型有许多成功的产品,20世纪70年代的产品大部分网状系统,例如,honeywell公司的ids/ⅱ、hp公司的image/3000、burroughs公司的dmsⅱ、umivac公司的dms1100、cullinet公司的idms、cimcom公司的total等
(3)关系模型。关系模型的主要是用二维表格结构表达实体集,用外键表示实体间联系。关系模型是由若干个关系模式组成的集合。关系模式相当于前面提到的记录类型,它的实例称为关系,每个关系实际上是一张二维表格。
关系模型和层次、网状模型的最大判别是用关键码而不是用指针导航数据,表格简单用户易懂,编程时并不涉及存储结构,访问技术等细节。关系模型是数学化模型。sql语言是关系数据库的标准化语言,已得到了广泛的应用。20世纪70年代对关系数据库的研究主要集中在理论和实验系统的开发方面。80年代初才形成产品,但很快得到广泛的应用和普及,并最终取代了层次、网状数据库产品。现在市场上典型的关系dbms产品有db2、oracle、sybase、informix和微机型产品foxpro、access等。
关系模型和网状、层次模型的最大区别是:关系模型用表格数据而不是通过指针链来表示和实现实体间联系。关系模型的数据结构简单、易懂。只需用简单的查询语句就可对数据库进行操作。
关系模型是数学化的模型,可把表格看成一个集合,因此集合论、数理逻辑等知识可引入到关系模型中来。关系模型已是一个成熟的有前途的模型,已得到广泛应用。
(4)面向对象模型。目前,关系数据库的使用已相当普遍,但是,现实世界中仍然存在着许多含有复杂数据结构的应用领域,例如,cad数据、图形数据等,而关系模型在这方面的处理能力就显得力不从心。因此,人们需要更高级的数据库技术来表达这类信息。面向对象的概念最早出现在程序设计语言中,随后迅速渗透到计算机领域的每一个分支。面向对象数据库是面向对象概念与数据库技术相结合的产物。
面向对象模型能完整地描述现实世界的数据结构,具有丰富的表达能力,但模型相对较复杂,涉及的知识面也广,因此面向对象数据库尚未达到关系数据库那样的普及程度。

2.2.2  数据库体系结构
数据库的体系结构分三级:内部级(internal),概念级(conceptual)和外部级(external)。这个三级结构有时也称为“三级模式结构”,或“数据抽象的三个级别”,最早是在1971年通过的dbtg报告中提出,后来收入在1975年的美国ansi/sparc报告中。虽然现在dbms的产品多种多样,在不同的操作系统支持下工作,但是大多数系统在总的体系结构上都具有三级模式的结构特征。

 

 

 

 

 


从某个角度看到的数据特性称为“数据视图”(data view)。
外部级最接近用户,是单个用户所能看到的数据特性。单个用户使用的数据视图的描述称为“外模式”。
概念级涉及到所有用户的数据定义,是全局的数据视图。全局数据视图的描述称为“概念模式”。
内部级最接近于物理存储设备,涉及到实际数据存储的结构。物理存储数据视图的描述称为“内模式”。
数据库的三级模式结构是数据的三个抽象级别。它把数据的具体组织留给dbms去做,用户只要抽象地处理数据,而不必关心数据在计算机中的表示和存储,这样就减轻了用户使用系统的负担。
三级结构之间往往差别很大,为了实现这三个抽象级别的联系和转换,dbms在三级结构之间提供两个层次的映象(mappings):外模式/模式映象,模式/内模式映象。此处模式是概念模式的简称。
2.2.3  数据的独立性
由于数据库系统采用三级模式结构,因此系统具有数据独立性的特点。在数据库技术中,数据独立性是指应用程序和数据之间相互独立,不受影响。数据独立性分成物理数据独立性和逻辑数据独立性两级。
(1)物理数据独立性
如果数据库的内模式要进行修改,即数据库的存储设备和存储方法有所变化,那么模式/内模式映象也要进行相当的修改,使概念模式尽可能保持不变。也就是对内模式的修改尽量不影响概念模式,当然,对于外模式和应用程序的影响更小,这样,我们称数据库达到了物理数据独立性。
(2)逻辑数据独立性
如果数据库的概念模式要进行修改,譬如增加记录类型或增加数据项,那么外模式/模式映象也要进行相应的修改,使外模式尽可能保持不变。也就是对概念模式的修改尽量不影响外模式和应用程序,这样,我们称数据库达到了逻辑数据独立性。
现有关系系统产品均提供了较高的物理独立性,而对逻辑独立性的支持尚有欠缺,例如,对外模式的数据更新受到限制等。
2.2.4  范式
建立起一个良好的数据指标体系,是建立数据结构和数据库的最重要的一环。一个良好的数据指标体系是建立db的必要条件,但不是充分条件。我们完全可以认为所建指标体系中的一个指标类就是关系数据库中的一个基本表,而这个指标类下面的一个个具体指标就是这个基本表中的一个字段。但如果直接按照这种方式建库显然还不能算最佳。对于指标体系中数据的结构在建库前还必须进行规范化的重新组织。
在数据的规范化表达中,一般将一组相互关联的数据称为一个关系(relation),而在这个关系下的每个数据指标项则被称为数据元素(data element),这种关系落实到具体数据库上就是基本表,而数据元素就是基本表中的一个字段(field)。规范化表达还规定在每一个基本表中必须定义一个数据元素为关键字(key),它可以唯一地标识出该表中其它相关的数据元素。在规范化理论中表是二维的,它有如下四个性质:
在表中的任意一列上,数据项应属于同一个属性(如图中每一列都存放着不同合同记录的同一属性数据)。
表中所有行都是不相同的,不允许有重复组项出现(如图中每一行都是一个不同的合同记录)。
在表中,行的顺序无关紧要(如图中每行存的都是合同记录,至于先放哪一个合同都没关系)。
在表中,列的顺序无关紧要,但不能重复(如图中合同号和合同名谁先谁后都没关系,但二者不可重复或同名)。
在对表的形式进行了规范化定义后,数据结构还有五种规范化定义,定名为规范化模式,称为范式。在这五种范式中,一般只用前三种,对于常用系统就足够了。而且这五种范式是“向上兼容”的,即满足第五范式的数据结构自动满足一、二、三、四范式,满足第四范式的数据结构自动满足第一、二、三范式,……,依此类推。
第一范式(first normal form,简称1st nf)就是指在同一表中没有重复项出现,如果有则应将重复项去掉。这个去掉重复项的过程就称之为规范化处理。在本文所讨论的开发方法里,1st nf实际上是没有什么意义的。因为我们按规范化建立的指标体系和表的过程都自动保证了所有表都满足1st nf。
第二范式(second normal form,简称 2nd nf)是指每个表必须有一个(而且仅一个)数据元素为主关键字(primary key),其它数据元素与主关键字一一对应。例如,在图l9.7中如果我们将合同号定义为主关键字(其它数据元素中的记录数据都有可能重名,故不能作为主关键字),故只要知道了一个合同记录的合同号,就可以唯一地在同一行中找到该合同的任何一项具体信息。通常我们称这种关系为函数依赖(functional dependence)关系。即表中其它数据元素都依赖于主关键字,或称该数据元素唯一地被主关键字所标识。
第三范式(third normal form,简称 3rd nf)就是指表中的所有数据元素不但要能够唯一地被主关键字所标识,而且它们之间还必须相互独立,不存在其它的函数关系。也就是说对于一个满足了 2nd nf的数据结构来说,表中有可能存在某些数据元素依赖于其它非关键宇数据元素的现象,必须加以消除。
为防止数据库出现更新异常、插入异常、删除异常、数据冗余太大等现象,关系型数据库要尽量按关系规范化要求进行数据库设计。


§2.3 sql语言基础
2.3.1  sql简介
用户对数据库的使用,是通过数据库管理系统提供的语言来实现的。不同的数据库管理系统提供不同的数据库语言。关系数据库管理系统几乎都提供关系数据库标准语言——sql。
sql 的全称是structured query language,即结构化查询语言。sql语句可以从关系数据库中获得数据,也可以建立数据库、增加数据、修改数据。1986年ansi采用sql语言作为关系数据库系统的标准语言,后被国际化标准组织(iso)采纳为国际标准。sql语言使用方便、功能丰富、简洁易学,是操作数据库的工业标准语言,得到广泛地应用。例如关系数据库产品db2、oracle等都实现了sql语言。同时,其它数据库产品厂家也纷纷推出各自的支持sql的软件或者与sql的接口软件。这样sql语言很快被整个计算机界认可。
sql语言是一种非过程化语言,它一次处理一个记录集合,对数据提供自动导航。sql语言允许用户在高层的数据结构上工作,而不对单个记录进行操作。sql语言不要求用户指定数据的存取方法,而是使用查询优化器,由系统决定对指定数据存取的最快速手段。当设计者在关系表上定义了索引时,系统会自动利用索引进行快速检索,用户不需知道表上是否有索引或者有什么类型的索引等细节。
sql语言可以完成许多功能,例如:
● 查询数据
● 在数据库表格中插入、修改和删除记录
● 建立、修改和删除数据对象
● 控制对数据和数据对象的存取
● 确保数据库的一致性和完整性等
2.3.2  sql查询
数据查询是关系运算理论在sql语言中的主要体现,select 语句是sql查询的基本语句,当我们在对一个数据库进各种各样的操作时,使用的最多的就是数据查询,在以sql为基础的关系数据库中,使用的最多的就是select查询语句。
select语句的完整句法如下:
select 目标表的列名或列表达式序列
from   基本表和(或)视图序列
[where 行条件表达式]
[group by 列名序列]
[having 组条件表达式]
[order by列名 [asc│deac]…]
我在select语句中还使用了大量的保留字和通配符以进行各种各样的条件查询。在系统中有大量的查询按钮,其使用了大量的查询语句,而且这些查询语句大部分使用的是模糊查询,所以大量的使用了模式匹配符like(判断值是否与指定的字符通配格式相符)。在包含like的查询语句中可以使用两个通配符:%(百分号):与零个或多个字符组成的字符串匹配;_(下划线):与单个字符匹配。系统中的条件判断往往包含多个条件,这时就需要使用逻辑运算符not、and、or(用于多条件的逻辑连接),谓词all以及保留字distinct等等。做为select语句还有很多的使用方法,这里就不再叙述。
2.3.3  sql数据更新
使用数据库的目的是为了有效地管理数据,而数据的插入、删除和修改则是必不可少的一个功能。在本系统中就大量地使用了数据插入、删除和修改这三种操作,现做一个简单地介绍。
●数据插入
往数据库的基本表中插入数据使用的是insert语句,其方式有两种:一种是元组值的插入,另一种是查询结果的插入。在本系统中使用的是前一种方式,其句法如下:
insert into 基本表名(列表名)values(元组值)
●数据删除
往数据库的基本表中删除数据使用的是delete语句,其句法如下:
delete from 基本表名 [where 条件表达式]
在些作一点说明,删除语句实际上是“select * from 基本表名 [where 条件表达式]”和delete操作的结合,每找到一个元组,就把它删除。此外,delete语句只能从一个基本表中删除元组,where子句中条件可以嵌套,也可以是来自几个基本表的复合条件。
●数据修改
当需要修改基本表中元组的某些列值时,可以用update语句实现,其句法如下:
update基本表名
set列名=值表达式[,列名=值表达式…]
[where条件表达式]
在delphi中使用sql语句是很方便的,一般来说,都是通过tquery组件来使用sql语言的。有一点要进行说明,虽然通过tquery组件来使用sql语言很方便,但考虑到自己对不同组件的理解程度、个人习惯以及其它各个方面,在本系统中我采用的是ado组件来对数据库进行操作。最简单的方法比如在tadoquery组件的sql属性中就可以键入sql语句,至于详细的使用方法在后面进行介绍。
 
第三章    数据库开发工具
§3.1 delphi 6.0 简介
delphi类可以粗略地分成两部分:一部分是组件类,这些组件类通常以某种方式出现在组件面板上,当用户从组件面板上点取一个类的图标后,在程序中就自动生成了该类的对象(非可视组件除外);另一部分是功能类,这此功能类的对象通常出现在程序代码中,起着不可代替的作用,但是这些功能类在组件面板上是找不到的。在delphi中,每一个类的祖先都是tobject类,整个类的层次结构就像一棵倒挂的树,在最顶层的树根即为tobject类。这样,按照面向对象编程的基本思想,就使得用户可用tobject类这个类型代替任何其它类的数据类型。实际上在delphi的类库中,tobject类派生出了为数相当众多的子类,它们形成了一个庞大的体系,通常情况下,如果不自行开发组件,就不必了解整个类的体系结构,只用到类层次树的叶结点就足够了。
凡是做过程序开发的人都知道从来没有单纯的数据应用程序,也就是说,数据库应用程序必须和用户界面(可以是图形界面,也可以是命令接口)元素相结合,只讲界面或只讲数据库本身都构不成数据库应用程序,因而用delphi 6.0开发数据库应用程序就隐含着界面开发。delphi6中的vcl组件可用图3-1来说明。

 

 

 

 


组件在delphi程序的开发中是最显眼的角色。大家知道,在编写程序时一般都开始于在组件面板上选择组件并定义组件间的相互作用。但也有一些组件不在组件面板上,例如tform和tapplication(典型的非可视组件)。组件是tcomponents派生出来的子类,可以流的形式存放在dfm文件中,具有事件和publish属性。
窗口组件类是窗口化的可视化组件类,在delphi的类库中占有最大的份额。在实际编程中,窗口组件类的对象都有句柄,可以接受输入焦点和包含其它组件。
图形组件与窗口组件并列,是另一大类组件。图形组件不是基于窗口的,因而不能有窗口句柄,不能接受输入焦点和包含其它组件。从图8-43中可以看出,图形组件的基类是tgraphiccontrol,在实际编程中,它们必须寄生于它们的宿主——窗口组件类的对象,由它们的拥有者负责其显示,而且它们还能触发一些和鼠标活动相关的事件。图形控件最典型的例子是tlabel和tspeedbutton。由此可以看出图形组件的功能很弱,有读者会问图形组件的用处何在呢?其实使用图形组件的最大好处在于节省资源,正是因为它们的功能较弱,所以使用的系统资源就要少。在一个应用程序中,如果能在不影响其功能的前提下合理大量地使用图形组件,将会大减少程序对系统资源的消耗。
非可视组件是与可视组件相并列的另一类组件,非可视组件在程序运行中是不可见的(除各种对话框组件之外,事实上有人认为对话框组件不能归入非可视组件,应该是另一种介于可视与非可视之间的组件)。
§3.2 delphi 6.0 控件
用delphi6开发数据库应用,重点是和各种数据库组件打交道,当然也要使用其它的一些组件,现在就我在系统设计中所使用的重要组件给与简单介绍。
3.2.1  ado数据访问组件
ado数据对象(active data objects)实际是一种提供访问各种数据类型的链接机制。ado设计为一种极简单的格式,通过odbc的方法同数据库接口中,可以使用任何一种odbc数据源,即不止适合于sql server、oracle、access等数据库应用程序,也适合于excel表格、文本文件、图形文件和无格式的数据文件。ado是基于ole-db之上的技术,因此ado通过其内部的属性和方法提供统一的数据访问接口方法。ado使您的客户端应用程序能够通过ole db提供访问和操作在数据库服务器中的数据。ado支持用于建立c/s和web的应用程序的主要功能。其主要优点是易于使用、高速度、低内存支出和占用磁盘空间较少。ado同时具有远程数据服务(rds)功能,通过rds可以在一次往返过程中实现将数据从服务器移动到客户端应用程序和web页、在客户端对数据进行处然后将更新结果返回服务器的操作。
delphi 6.0继续对microsoft的ado访问能力的支持。这种能力是通过一组新组件实现的,这些组件是在企业版的ado组件页中,在组件面版的ado页上可以找到这些组件。利用在前面章节提到的tdataset抽象类,ado组件可以不通过bde而直接实现ado连接。这意味着只需要很少的代码就可以实现该连接并且性能得到提高。
利用ado数据访问组件,可以只使用ado结构与数据库取得联系并对其中的数据进行操作,而在这些过程中完全不需要使用bde。大多数的ado连接和数据集组件都是与基于bde的连接和数据集组件相类似的。tadoconnection组件与基于bde的应用程序中的tdatabase组件类似。tadotable与ttable,tadoquery与tquery,以及tadostoreproc和tstoredproc之间都具有这种类似的对应关系。使用这些ado组件的方式与我们常使用的数据访问组件(基于bde)都有许多相同之处。ttadodataset没有直接的bde对应组件,但它提供了许多与ttable和tquery相同的功能。同样,tadocommand也没有相对应的bde组件,它是在delphi/ado环境中完成特定功能的组件。delphi 6.0通过ado数据集访问组件,可以不借助bde数据引擎而是通过微软的oledb来访问更为广泛的数据库中的数据。ado数据集访问组件与常用的数据访问组件是并列的关系。
在系统中我主要使用的是adotablet和adoquery两个组件。
3.2.2  数据控制类datacontrol
数据控制类负责数据库数据的显示,并把用户对数据的修改传回。这里的绝大多数组件,如dbtext, dbedit,  dbmemo, dbimage, dblistbox, dbcombobox, dbcheckbox, dbradiogroup, dblookuplistbox, dblookupcombox, dbctrgrid的功能和对应的非数据感知组件相同,如tedit框,tradiogroups单选按钮组等,只不过在显示数据库数据时要用而已。
在系统中主要使用数据网格控件dbgrid和数据库导航器控件dbnavigator。
3.2.3  数据访问类dataaccess
数据库应用系统中数据访问是一个首要问题,包括单用户和 c/s系统,都必须联系一些数据库和数据表文件。delphi 6 提供了专门用于数据访问的基类控件。主要包括数据源控件datasource、客户数据集控件clientdataset、数据集提供器控件datasetprovider等等。
tdatabase:当一个基于bde的数据库应用程序需要一个永久数据库连接时,需要定制向一个数据库服务器的连接时,需要事务控制和特殊的数据库别名时就得用到tdatabase对象。特别是当连接到一个远程的sql数据库服务器时,如果要利用bde进行数据库事务处理,那么,tdatabase对象的威力就体现出来了。在一个应用程序中为每一个数据库连接显示的声明tdatabase对象要根据需要而定,不是必需的。对一个数据库连接,如果没有显示的声明并实例化tdatabase对象,系统就会产生一个带有默认属性的tdatabase对象。
tdatasource对象用于在dataset对象(包括tquery,tstoredproc,ttable等)和数据感知组件之间提供一个连接的纽带,以便在窗体上显示数据库中的数据,在数据库中导航定位与编辑数据集中的数据。如果一个dataset对象中的数据想在数据感知组件中显示和修改,它就必须和tdatasource对象相联系。同样,一个数据感知组件如果想和数据源相联系以便显示和操纵数据,就必须以tdatasource对象为中介。
用delphi6作数据库应用开发概括来说如下:先利用数据存取组件和实际的数据库建立连接,并用tsession对象和tdatabase对象管理这些连接。然后以tdatasource对象为中介,用数据感知组件向用户显示数据库的内容并接受用户的查询和修改等操作。
3.2.4  sql语言在delphi中的应用
在delphi中使用sql语言非常方便,一般来说,都是通过tquery组件来使用sql语言的。可以在tquery组件的sql属性中设置sql语句。设计程序时,在该组件的属性对话框中选择sql属性,单击带省略号的按钮,就可以打开string list editor对话框,然后我们就可以在对话框中添加sql语句。还可以使用delphi的sql builder来自动生成sql语句,这样可以避免手工编写sql而可能造成的语法错误。
静态sql语句在程序设计时便已固定下来,它不包含任何参数和变量。
动态sql语句,也被称作参数化的语句,在其中间包含着表示字段名或表名的参数,例如下面的语句是一条动态sql语句:
select  *  from  students  where studentcode =: studentcode;
其中的变量studentcode便是一个参数变量,它由一个冒号引导,在程序运行过程中,必须要为该参数赋值,该条sql语句才能正确执行,每次运行应用程序时可以为该参数变量赋予不同的值。为参数赋值有三种方法:
①根据参数在sql语句中出现的顺序,设置tquery部件的params属性值为参数赋值。
②直接根据sql语句中各参数的名字,调用parambyname方法来为各参数赋值。
③将tquery部件的datasource属性设置为另一个数据源,这样将另一个数据源中与当前tquery部件的sql语句中的参数名相匹配的字段值赋给其对应的参数。利用这种方法也能实现所谓的连接查询,创建主要—明细型数据库应用。
在程序运行过程中,要想设置tquery部件的sql属性,必须首先调用close方法,关闭tquery部件,然后再调用clear方法清除sql属性中现存的sql命令语句, 最后再调用add方法为sql属性设置新的sql命令语句。例如:
query1.close {关闭query1)
query1.sql.clear {清除sql属性中的sql命令语句}
query1.sql.add(‘’select * from students”);
query1.sql.add(” where name ="lucy" ”);
在为tquery部件设置sql属性时调用close方法总是很安全的,如果tquery部件已经被关闭了,调用close方法时不会产生任何影响。在应用程序中为sql属性设置新的sql 命令语句时,必须要调用clear方法以清除sql属性中现存的sql命令语句,如果不调用clear方法,便调用add方法向sql属性中设置sql命令语句,那么新设置的sql命令语句会追加在现存sql命令语句后面, 在程序运行时常常会出现出乎意料的查询结果甚至程序无法运行下去。
在这里要特别注意的,一般情况下tquery部件的sql属性只能包含一条完整的sql语句,它不允许被设置成多条sql语句。当然有些数据库服务器也支持在tquery部件的sql属性中设置多条sql语句,只要数据库服务器允许这样,我们在编程时可以为 sql 属性设置多条sql语句。
在为tquery部件设置完sql属性的属性值之后,也即编写好适当的sql程序之后,可以有多种方式来执行sql程序。
在设计过程中,设置完tquery部件的sql属性之后将其active属性的值置为true, 这样便可以执行sql属性中的sql程序,如果应用中有与tquery部件相连的数据浏览部件( 如tddgrid tdbedit等)那么在这些数据浏览部件中会显示sql程序的执行结果。
在应用程序运行过程中,通过程序调用tquery部件的open方法或execsql 方法可以执行其sql属性中的sql程序。open方法和execsql方法是不一样的。open方法只能用来执行sql语言的查询语句(select命令), 并返回一个查询结果集,而execsql方法还可以用来执行其它常用的sql语句(如insert, update, delete等命令),例如:
query1.open (这样会返回一个查询结果集)
如果调用open方法,而没有查询结果时,会出错。此时应该调用execsql 方法来代替open方法。如:
query1.execsql (没有返回结果)
当然在设计应用程序时,程序设计人员是无法确定tquery部件中的sql 语句是否会返回一个查询结果的。对于这种情况应当用try…except模块来设计程序。在 try 部分调用open方法,而在except部分调用excesql方法,这样才能保证程序的正确运行。
delphi中用adoquery来使用sql语句同样十分方便。在adoquery组件中首先通过connectionstring属性值来联接数据源,然后就通过双击sql…属性值来写入sql语句。在delphi中调用数据库,就可以调用adoquery组件,通过修改其中的sql…属性中的sql语句来实现对数据库的各项操作。
值得注意的是,adoquery组件只有在激活的情况下才可以被正确地使用,这样就提出了一个问题,也就是说,在每次修改adoquery组件的sql…属性时都必须先行进行关闭,待清除掉sql…中所有的sql语句后才可以添加新的sql语句。而且,在每一次修改完成以后,还应该记得重新将adoquery激活。其它的使用方法与ttquery有许多的相似之处。
§3.3 access 简介
建立一个数据库我们有多种选择,现在市场上有各种各样的数据库,而且每一种数据库都有其自身的特点,不能说哪一种更好,只能在其中寻找一种能更好地适应系统需求、更好地满足用户的要求以及适应开发人员的习惯。在本系统中,做为图书仓库管理系统是一个比较小的应用系统,它所产生和处理的数据量也比较小。因此,没有必要使用像sql server和oracle这样的大型数据库。我首先想到的数据库是borland公司的paradox数据库。另外,microsoft office中的access数据库在计算机上的应用比较普及,是开发小型数据库系统的比较理想的选择,所以,在本系统中我选择了access数据库。
access做为一个数据库管理系统,它被集成在microsoft office中。access数据库处理的基本结构,采取关系型数据库模式。与其他的数据库系统相比,access更加简单易学,一个普通的计算机用户可以很快地掌握它。access 2000的功能十分强大,利用它可以方便地实现对信息保存、维护、查询、统计、打印、交流、发布,而且它可以十分方便地与office其他组件交流数据,这些功能对一个一般用户而言已经足够了。


 
第四章  系统总体设计
软件系统的总体设计大约要经历可行性分析和项目开发计划,需求分析,概要设计,详细设计,编码,测试以及维护等七个阶段。可行性分析和项目开发计划在前面已经叙述,下面所要做的是进行软件需求分析,概要设计和详细设计。编码过程将在下一节论述,而测试和维护过程不在本文叙及。
§4.1   系统需求分析
在经过前一阶段的分析之后,我确定了我的开发课题为图书仓库管理。现在所要做的是要准确定义系统必须做什么以及系统必须具备的功能。
软件需求分析中我采用结构化分析方法(structured analysis,简称sa),sa是面向数据流进行需求分析的方法,像所有的软件分析方法(如面向对象分析方法、idef方法等等)一样,sa也是一种建模活动,它使用简单易读的符号,根据软件内部数据传递、变换的关系,自顶向下逐层分解,描绘满足功能要求的软件模型。
在系统中我采用数据流图(dfd)这种半形式化的描述方式表达需求。它是一种功能模型,以图形的方式描绘数据在系统中流动和处理的过程,只反映系统必须完成的逻辑功能。它有四种基本图形符号:
◆ →:箭头,表示数据流;
◆ 〇:圆或椭圆,表示加工;
◆ ═:双杠,表示数据存储;
◆ □:方框,表示数据的源点或终点。
为了表达较为复杂问题的数据处理过程,用一张数据流图是不够的,要按照问题的层次结构进行逐步分解,并以一套分层的数据流图反映这种结构关系。在这里我一共使用了三层数据流图,即顶层图,0层图和1层图(也是底层图)。
在多层数据流图中,顶层流图仅包含一个加工,它代表被开发系统,它的输入流是该系统的输入数据了,输出流是该系统的输出数据;底层流图是指其加工不需要再做分解的数据流图,中间层流图表示对其上层父图的细化,它的每一步加工可能继续细化成子图。
经过对系统的分析首先得到系统的顶层dfd,如下:


           

 


进一步细化得到系统的0层dfd,如下:

 

 

      

 

 


再进一步细化每一个数据加工功能,得到系统的1层dfd图。

 

 

 

 

 

在这里只给出有关入库管理和出库管理的1层数据流图,它们是系统的关鍵部分,也是主要的部分。通过以上对数据流图的分析之后,我们已大体地了解了系统的功能和目标,接下来所要做的就是系统功能模块的划分和数据库的设计,也就是系统的概要设计。
§4.2   系统概要设计
在软件需求分析阶段,搞清楚了软件“做什么”的问题,形成了目标系统的逻辑模型。现在我们所要做的就是要把软件“做什么”的逻辑模型变换为“怎么做”的物理模型,即着手实现软件的需求。首先,我们需要描述的是系统的总的体系结构。
4.2.1  系统结构设计
系统的概要设计中最重要的就是系统的模块化。模块化是指解决一个复杂问题时自项向下逐层把软件系统划分成若干个模块的过程。每个模块完成一个特定的功能,所有的模块按某种方法组织起来,成为一个整体,完成整个系统所要求的功能。
 将系统划分为多个模块是为了降低软件系统的复杂性,提高可读性、可维护性,但模块的划分不能是任意的,应尽量保持其独立性。也就是说,每个模块只完成系统要求的独立的子功能,并且与其他模块的联系最少且接口简单,即尽量做到高内聚低耦合,提高模块的独立性,为设计高质量的软件结构奠定基础。
在系统的概要设计中我采用结构化设计(structure design,简称sd),sd以需求分析阶段产生的数据流图dfd为基础,按一定的步骤映射成软件结构。我首先将整个系统化分为几个小问题,

2005年06月11日

今天听了Pacific Moon 的5部专集才知道音乐原来可以如此的唯美,Pacific Moon 将音乐的魂用最为温柔和美丽的乐器和声音释放出来。

2004年12月09日












十个有哲理的故事 一场精彩的人生课
| [<<] [>>]






1、陈阿土
  陈阿土是农民,从来没有出过远门。攒了半辈子的钱,终于参加一个旅游团出了国。国外的一切都是非常新鲜的,关键是,陈阿土参加的是豪华团,一个人住一个标准间。这让他新奇不已。早晨,服务生来敲门送早餐时大声说道:“GOOD MORNING SIR!”陈阿土愣住了。这是什么意思呢?在自己的家乡,一般陌生的人见面都会问:“您贵姓?”于是陈阿土大声叫道:“我叫陈阿土!”如是这般,连着三天,都是那个服务生来敲门,每天都大声说:“GOOD MORNING SIR!”
  而陈阿土亦大声回道:“我叫陈阿土!”但他非常的生气。这个服务生也太笨了,天天问自己叫什么,告诉他又记不住,很烦的。终于他忍不住去问导游,“GOOD MORNING SIR!”是什么意思,导游告诉了他,天啊!!真是丢脸死了。陈阿土反复练习“GOOD MORNING SIR!”这个词,以便能体面地应对服务生。又一天的早晨,服务生照常来敲门,门一开陈阿土就大声叫道:“GOOD MORNING SIR!”与此同时,服务生叫的是:“我是陈阿土!”
  这个故事告诉我们,人与人交往,常常是意志力与意志力的较量。不是你影响他,就是他影响你,而我们要想成功,一定要培养自己的影响力,只有影响力大的人才可以成为最强者。
  2、表演大师
  有一位表演大师上场前,他的弟子告诉他鞋带松了。大师点头致谢,蹲下来仔细系好。等到弟子转身后,又蹲下来将鞋带解松。有个旁观者看到了这一切,不解地问:“大师,您为什么又要将鞋带解松呢?”大师回答道:“因为我饰演的是一位劳累的旅者,长途跋涉让他的鞋事松开,可以通过这个细节表现他的劳累憔悴。”“那你为什么不直接告诉你的弟子呢?”“他能细心地发现我的鞋带松了,并且热心地告诉我,我一定要保护他这种热情的积极性,及时地给他鼓励,至于为什么要将鞋带解开,将来会有更多的机会教他表演,可以下一次再说埃”人一个时间只能做一件事,懂抓重点,才是真正的人才。
  3、鹦鹉
  一个人去买鹦鹉,看到一只鹦鹉前标:此鹦鹉会两门语言,售价二百元。另一只鹦鹉前则标道:此鹦鹉会四门语言,售价四百元。该买哪只呢?两只都毛色光鲜,非常灵活可爱。这人转啊转,拿不定主意。结果突然发现一只老掉了牙的鹦鹉,毛色暗淡散乱,标价八百元。这人赶紧将老板叫来:这只鹦鹉是不是会说八门语言?店主说:不。这人奇怪了:那为什么又老又丑,又没有能力,会值这个数呢?店主回答:因为另外两只鹦鹉叫这只鹦鹉老板。
  这故事告诉我们,真正的领导人,不一定自己能力有多强,只要懂信任,懂放权,懂珍惜,就能团结比自己更强的力量,从而提升自己的身价。相反许多能力非常强的人却因为过于完美主义,事必躬亲,什么人都不如自己,最后只能做最好的攻关人员,销售代表,成不了优秀的领导人。
  4、金人
  曾经有个小国的人到中国来,进贡了三个一模一样的金人,金壁辉煌,把皇帝高兴坏了。可是这小国的人不厚道,同时出一道题目:这三个金人哪个最有价值?皇帝想了许多的办法,请来珠宝匠检查,称重量,看做工,都是一模一样的。
  怎么办?使者还等着回去汇报呢。泱泱大国,不会连这个小事都不懂吧?最后,有一位退位的老大臣说他有办法。皇帝将使者请到大殿,老臣胸有成足地拿着三 根稻草,插入第一个金人的耳朵里,这稻草从另一边耳朵出来了。第二个金人的稻草从嘴巴里直接掉出来,而第三个金人,稻草进去后掉进了肚子,什么响动也没有。老臣说:第三个金人最有价值!使者默默无语,答案正确。
  这个故事告诉我们,最有价值的人,不一定是最能说的人。老天给我们两只耳朵一个嘴巴,本来就是让我们多听少说的。善于倾听,才是成熟的人最基本的素质。
  5、辞职
  A对B说:“我要离开这个公司。我恨这个公司!”B建议道:“我举双手赞成你报复!!破公司一定要给它点颜色看看。不过你现在离开,还不是最好的时机。”
  A问:为什么?B说:“如果你现在走,公司的损失并不大。你应该趁着在公司的机会,拼命去为自己拉一些客户,成为公司独挡一面的人物,然后带着这些客户突然离开公司,公司才会受到重大损失,非常被动。”A觉得B说的非常在理。于是努力工作,事遂所愿,半年多的努力工作后,他有了许多的忠实客户。再见面时B问A:现在是时机了,要跳赶快行动哦!A淡然笑道:老总跟我长谈过,准备升我做总经理助理,我暂时没有离开的打算了。
  其实这也正是B的初衷。一个人的工作,永远只是为自己的简历。只有付出大于得到,让老板真正看到你的能力大于位置,才会给你更多的机会替他创造更多利润。
  6、选择
  有三个人要被关进监狱三年,监狱长给他们三个一人一个要求。美国人爱抽雪茄,要了三箱雪茄。法国人最浪漫,要一个美丽的女子相伴。而犹太人说,他要一部与外界沟通的电话。三年过后,第一个冲出来的是美国人,嘴里鼻孔里塞满了雪茄,大喊道:“给我火,给我火!”原来他忘了要火了。接着出来的是法国人。只见他手里抱着一个小孩子,美丽女子手里牵着一个小孩子,肚子里还怀着第三个。最后出来的是犹太人,他紧紧握住监狱长的手说:“这三年来我每天与外界联系,我的生意不但没有停顿,反而增长了200%,为了表示感谢,我送你一辆劳施莱斯!”
  这个故事告诉我们,什么样的选择决定什么样的生活。今天的生活是由三年前我们的选择决定的,而今天我们的抉择将决定我们三年后的生活。我们要选择接触最新的信息,了解最新的趋势,从而更好的创造自己的将来。
  7、老虎
  两个人在森林里,遇到了一只大老虎。A就赶紧从背后取下一双更轻便的运动鞋换上。B急死了,骂道:“你干嘛呢,再换鞋也跑不过老虎啊!”A说:“我只要跑得比你快就好了。”
  二十一世纪,没有危机感是最大的危机。特别是入关在即,电信,银行,保险,甚至是公务员这些我们以为非常稳定和有保障的企业,也会面临许多的变数。
  当更多的老虎来临时,我们有没有准备好自己的跑鞋?
  8、赶考
  有位秀才第三次进京赶考,住在一个经常住的店里。考试前两天他做了三个梦,第一个梦是梦到自己在墙上种白菜,第二个梦是下雨天,他戴了斗笠还打伞,第三个梦是梦到跟心爱的表妹脱光了衣服躺在一起,但是背靠着背。这三个梦似乎有些深意,秀才第二天就赶紧去找算命的解梦。算命的一听,连拍大腿说:“你还是回家吧。你想想,高墙上种菜不是白费劲吗?戴斗笠打雨伞不是多此一举吗?跟表妹都脱光了躺在一张床上了,却背靠背,不是没戏吗?”秀才一听,心灰意冷,回店收拾包袱准备回家。店老板非常奇怪,问:“不是明天才考试吗,今天你怎么就回乡了?”秀才如此这般说了一番,店老板乐了:“哟,我也会解梦的。我倒觉得,你这次一定要留下来。你想想,墙上种菜不是高种吗?戴斗笠打伞不是说明你这次有备无患吗?跟你表妹脱光了背靠靠躺在床上,不是说明你翻身的时候就要到了吗?”秀才一听,更有道理,于是精神振奋地参加考试,居然中了个探花。
  积极的人,象太阳,照到哪里哪里亮,消极的人,象月亮,初一十五不一样。
  想法决定我们的生活,有什么样的想法,就有什么样的未来。
  9、骆驼
  在动物园里的小骆驼问妈妈:“妈妈妈妈,为什么我们的睫毛那么地长?”
  骆驼妈妈说:“当风沙来的时候,长长的睫毛可以让我们在风暴中都能看得到方向。”小骆驼又问:“妈妈妈妈,为什么我们的背那么驼,丑死了!”骆驼妈妈说:“这个叫驼峰,可以帮我们储存大量的水和养分,让我们能在沙漠里耐受十 几天的无水无食条件。”小骆驼又问:“妈妈妈妈,为什么我们的脚掌那么厚?”
  骆驼妈妈说:“那可以让我们重重的身子不至于陷在软软的沙子里,便于长途跋涉埃”小骆驼高兴坏了:“哗,原来我们这么有用啊!!可是妈妈,为什么我们还在动物园里,不去沙漠远足呢?”
  天生我才必有用,可惜现在没人用。一个好的心态+一本成功的教材+一个无限的舞台=成功。每人的潜能是无限的,关键是要找到一个能充分发挥潜能的舞台。
  10、分粥
  有七个人曾经住在一起,每天分一大桶粥。要命的是,粥每天都是不够的。
  一开始,他们抓阄决定谁来分粥,每天轮一个。于是乎每周下来,他们只有一天是饱的,就是自己分粥的那一天。后来他们开始推选出一个道德高尚的人出来分粥。强权就会产生腐败,大家开始挖空心思去讨好他,贿赂他,搞得整个小团体乌烟障气。然后大家开始组成三人的分粥委员会及四人的评选委员会,但他们常常互相攻击,扯皮下来,粥吃到嘴里全是凉的。最后想出来一个方法:轮流分粥,但分粥的人要等其它人都挑完后拿剩下的最后一碗。为了不让自己吃到最少的,每人都尽量分得平均,就算不平,也只能认了。大家快快乐乐,和和气气,日子越过越好。
  同样是七个人,不同的分配制度,就会有不同的风气。所以一个单位如果有不好的工作习气,一定是机制问题,一定是没有完全公平公正公开,没有严格的奖勤罚懒。如何制订这样一个制度,是每个领导需要考虑的问题。

2004年11月28日






五条毛毛虫的故事(水梦犹蓝提供)
  第一条毛毛虫

  话说第一条毛毛虫,有一天爬呀爬呀过山河,终于来到这棵苹果树下。它并不知道这是一棵苹果树,也不知树上长满了红红的苹果。当它看到同伴们往上爬时,不知所以的就跟着往上爬。没有目的,不知终点,更不知生为何求、死为何所。

  它的最后结局呢?也许找到了一只大苹果,幸福地过了一生;也可能在树叶中迷了路,颠沛流离糊涂一生。不过可以确定的是,大部分的虫都是这样活着的,也不去烦恼什么是生命意义,倒也轻松许多。

  第二条毛毛虫

  有一天,第二条毛毛虫也爬到了苹果树下。它知道这是一棵苹果树,也确定他的“虫生目标”就是找到一棵大苹果。问题是……它并不知道大苹果会长在什么地方?但它猜想:大苹果应该长在大枝叶上吧!于是它就慢慢地往上爬,遇到分支的时候,就选择较粗的树枝继续爬。

  当然在这个毛虫社会中,也存在考试制度,如果有许多虫同时选择同一个分支,可是要举行考试来决定谁才有资格通过大树枝。幸运的,这条毛毛虫一路过关斩将,每次都能选上最好的树枝,最后它从一枝名为“大学”的树枝上,找到了一只大苹果。不过它发现这只大苹果并不是树上最大的,顶多只能称是局部最大。因为在它的上面还有一只更大的苹果,号称“老板”,是由另一条毛毛虫爬过一根名为“创业”的树枝才找到的。
令他泄气的是,这个创业分支是他当年不屑于爬的一棵细小的树枝。

  第三条毛毛虫

  接着,第三条毛毛虫也来到了树下。这条毛毛虫相当难得,小小年纪,却自己研制了一副望远镜。在还未开始爬时,就先利用望远镜搜寻一番,找到了一只超大苹果。同时,它发觉当从下往上找路时,会遇到很多分支,有各种不同的爬法;但若从上往下找路时,却只有一种爬法。

  它很细心地从苹果的位置,由上往下反推至目前所处的位置,记下这条确定的路径。于是,它开始往上爬,当遇到分支时,他一点也不慌张,因为它知道该往哪条路走,不必跟着一大堆虫去挤破头。譬如说,如果它的目标是一只名叫“教授”的苹果,那应该爬“升学”这条路;如果目标是“老板”,那应该爬“创业”这分枝;若目标是“政客”,也许早就该选“厚黑之道”这条路了。

  最后,这条毛毛虫应该会有一个很好的结局,因为它己具备了先觉的条件了。但也许会有一些意外的结局出现,因为毛毛虫的爬行相当缓慢,从预定苹果到抵达时,需要一段时间。当它抵达时,也许苹果已被别的虫捷足先登,也许苹果已熟透而烂掉了。

  第四条毛毛虫

  第四条毛毛虫可不是一只普通的虫,同时具有先知先觉的能力。它不仅知道自己要何种苹果,更知道未来的苹果将如何成长。因此当它带着那“ 先觉”的望远镜时,它的目标并不是一只大苹果,而是一芽含苞待放的苹果花。它计算着自己的时程,并估计当它抵达时,这朵花正好长成一只成熟的大苹果,而且它将是第一个钻入大快朵颐的虫。

  果不其然,它获得了所应得的,从此过着幸福快乐的日子。

  第五条毛毛虫

  毛毛虫的故事本来应该到此结束了。因为所有故事的结局都必须是正面的且富有教育意义。但仍有不少读者好奇:第五条毛毛虫到底怎么了?

  其实它什么也没做,就在树下躺着纳凉,而一只只大苹果从天而降。因为树上某一大片树枝早就被它的家族占领了。它的爷爷、爸爸、哥哥们盘据在某一树干上,禁止它虫进入。然后苹果成熟时,就一颗颗地丢给底下的子孙们捡食。

  奉劝诸位,如果你不是含着金汤匙出生的,可不要妄想检到大苹果,因为反而会被砸死的。

2004年11月27日

经典c程序100例==91–100

【程序91】
题目:时间函数举例1
1.程序分析:
2.程序源代码:
#include “stdio.h”
#include “time.h”
void main()
{ time_t lt; /*define a longint time varible*/
lt=time(NULL);/*system time and date*/
printf(ctime(<)); /*english format output*/
printf(asctime(localtime(<)));/*tranfer to tm*/
printf(asctime(gmtime(<))); /*tranfer to Greenwich time*/
}
==============================================================
【程序92】
题目:时间函数举例2
1.程序分析:           
2.程序源代码:
/*calculate time*/
#include “time.h”
#include “stdio.h”
main()
{ time_t start,end;
int i;
start=time(NULL);
for(i=0;i<3000;i++)
{ printf(“\1\1\1\1\1\1\1\1\1\1\n”);}
end=time(NULL);
printf(“\1: The different is %6.3f\n”,difftime(end,start));
}
==============================================================
【程序93】
题目:时间函数举例3
1.程序分析:
2.程序源代码:
/*calculate time*/
#include “time.h”
#include “stdio.h”
main()
{ clock_t start,end;
int i;
double var;
start=clock();
for(i=0;i<10000;i++)
{ printf(“\1\1\1\1\1\1\1\1\1\1\n”);}
end=clock();
printf(“\1: The different is %6.3f\n”,(double)(end-start));
}
==============================================================
【程序94】
题目:时间函数举例4,一个猜数游戏,判断一个人反应快慢。(版主初学时编的)
1.程序分析:
2.程序源代码:
#include “time.h”
#include “stdlib.h”
#include “stdio.h”
main()
{char c;
clock_t start,end;
time_t a,b;
double var;
int i,guess;
srand(time(NULL));
printf(“do you want to play it.(‘y’ or ‘n’) \n”);
loop:
while((c=getchar())==’y')
{
i=rand()%100;
printf(“\nplease input number you guess:\n”);
start=clock();
a=time(NULL);
scanf(“%d”,&guess);
while(guess!=i)
{if(guess>i)
{printf(“please input a little smaller.\n”);
scanf(“%d”,&guess);}
else
{printf(“please input a little bigger.\n”);
scanf(“%d”,&guess);}
}
end=clock();
b=time(NULL);
printf(“\1: It took you %6.3f seconds\n”,var=(double)(end-start)/18.2);
printf(“\1: it took you %6.3f seconds\n\n”,difftime(b,a));
if(var<15)
printf(“\1\1 You are very clever! \1\1\n\n”);
else if(var<25)
printf(“\1\1 you are normal! \1\1\n\n”);
else
printf(“\1\1 you are stupid! \1\1\n\n”);
printf(“\1\1 Congradulations \1\1\n\n”);
printf(“The number you guess is %d”,i);
}
printf(“\ndo you want to try it again?(\”yy\”.or.\”n\”)\n”);
if((c=getch())==’y')
goto loop;
}
==============================================================
【程序95】
题目:家庭财务管理小程序
1.程序分析:
2.程序源代码:
/*money management system*/
#include “stdio.h”
#include “dos.h”
main()
{
FILE *fp;
struct date d;
float sum,chm=0.0;
int len,i,j=0;
int c;
char ch[4]=”",ch1[16]=”",chtime[12]=”",chshop[16],chmoney[8];
pp: clrscr();
sum=0.0;
gotoxy(1,1);printf(“|—————————————————————————|”);
gotoxy(1,2);printf(“| money management system(C1.0) 2000.03 |”);
gotoxy(1,3);printf(“|—————————————————————————|”);
gotoxy(1,4);printf(“| — money records — | — today cost list — |”);
gotoxy(1,5);printf(“| ———————— |————————————-|”);
gotoxy(1,6);printf(“| date: ————– | |”);
gotoxy(1,7);printf(“| | | | |”);
gotoxy(1,8);printf(“| ————– | |”);
gotoxy(1,9);printf(“| thgs: —————— | |”);
gotoxy(1,10);printf(“| | | | |”);
gotoxy(1,11);printf(“| —————— | |”);
gotoxy(1,12);printf(“| cost: ———- | |”);
gotoxy(1,13);printf(“| | | | |”);
gotoxy(1,14);printf(“| ———- | |”);
gotoxy(1,15);printf(“| | |”);
gotoxy(1,16);printf(“| | |”);
gotoxy(1,17);printf(“| | |”);
gotoxy(1,18);printf(“| | |”);
gotoxy(1,19);printf(“| | |”);
gotoxy(1,20);printf(“| | |”);
gotoxy(1,21);printf(“| | |”);
gotoxy(1,22);printf(“| | |”);
gotoxy(1,23);printf(“|—————————————————————————|”);
i=0;
getdate(&d);
sprintf(chtime,”%4d.%02d.%02d”,d.da_year,d.da_mon,d.da_day);
for(;;)
{
gotoxy(3,24);printf(” Tab __browse cost list Esc __quit”);
gotoxy(13,10);printf(” “);
gotoxy(13,13);printf(” “);
gotoxy(13,7);printf(“%s”,chtime);
j=18;
ch[0]=getch();
if(ch[0]==27)
break;
strcpy(chshop,”");
strcpy(chmoney,”");
if(ch[0]==9)
{
mm:i=0;
fp=fopen(“home.dat”,”r+”);
gotoxy(3,24);printf(” “);
gotoxy(6,4);printf(” list records “);
gotoxy(1,5);printf(“|————————————-|”);
gotoxy(41,4);printf(” “);
gotoxy(41,5);printf(” |”);
while(fscanf(fp,”%10s%14s%f\n”,chtime,chshop,&chm)!=EOF)
{ if(i==36)
{ getch();
i=0;}
if ((i%36)<17)
{ gotoxy(4,6+i);
printf(” “);
gotoxy(4,6+i);}
else
if((i%36)>16)
{ gotoxy(41,4+i-17);
printf(” “);
gotoxy(42,4+i-17);}
i++;
sum=sum+chm;
printf(“%10s %-14s %6.1f\n”,chtime,chshop,chm);}
gotoxy(1,23);printf(“|—————————————————————————|”);
gotoxy(1,24);printf(“| |”);
gotoxy(1,25);printf(“|—————————————————————————|”);
gotoxy(10,24);printf(“total is %8.1f$”,sum);
fclose(fp);
gotoxy(49,24);printf(“press any key to…..”);getch();goto pp;
}
else
{
while(ch[0]!=’\r’)
{ if(j<10)
{ strncat(chtime,ch,1);
j++;}
if(ch[0]==8)
{
len=strlen(chtime)-1;
if(j>15)
{ len=len+1; j=11;}
strcpy(ch1,”");
j=j-2;
strncat(ch1,chtime,len);
strcpy(chtime,”");
strncat(chtime,ch1,len-1);
gotoxy(13,7);printf(” “);}
gotoxy(13,7);printf(“%s”,chtime);ch[0]=getch();
if(ch[0]==9)
goto mm;
if(ch[0]==27)
exit(1);
}
gotoxy(3,24);printf(” “);
gotoxy(13,10);
j=0;
ch[0]=getch();
while(ch[0]!=’\r’)
{ if (j<14)
{ strncat(chshop,ch,1);
j++;}
if(ch[0]==8)
{ len=strlen(chshop)-1;
strcpy(ch1,”");
j=j-2;
strncat(ch1,chshop,len);
strcpy(chshop,”");
strncat(chshop,ch1,len-1);
gotoxy(13,10);printf(” “);}
gotoxy(13,10);printf(“%s”,chshop);ch[0]=getch();}
gotoxy(13,13);
j=0;
ch[0]=getch();
while(ch[0]!=’\r’)
{ if (j<6)
{ strncat(chmoney,ch,1);
j++;}
if(ch[0]==8)
{ len=strlen(chmoney)-1;
strcpy(ch1,”");
j=j-2;
strncat(ch1,chmoney,len);
strcpy(chmoney,”");
strncat(chmoney,ch1,len-1);
gotoxy(13,13);printf(” “);}
gotoxy(13,13);printf(“%s”,chmoney);ch[0]=getch();}
if((strlen(chshop)==0)||(strlen(chmoney)==0))
continue;
if((fp=fopen(“home.dat”,”a+”))!=NULL);
fprintf(fp,”%10s%14s%6s”,chtime,chshop,chmoney);
fputc(‘\n’,fp);
fclose(fp);
i++;
gotoxy(41,5+i);
printf(“%10s %-14s %-6s”,chtime,chshop,chmoney);
}}}
==============================================================
【程序96】
题目:计算字符串中子串出现的次数
1.程序分析:
2.程序源代码:
#include “string.h”
#include “stdio.h”
main()
{ char str1[20],str2[20],*p1,*p2;
int sum=0;
printf(“please input two strings\n”);
scanf(“%s%s”,str1,str2);
p1=str1;p2=str2;
while(*p1!=’\0′)
{
if(*p1==*p2)
{while(*p1==*p2&&*p2!=’\0′)
{p1++;
p2++;}
}
else
p1++;
if(*p2==’\0′)
sum++;
p2=str2;
}
printf(“%d”,sum);
getch();}
==============================================================
【程序97】
题目:从键盘输入一些字符,逐个把它们送到磁盘上去,直到输入一个#为止。
1.程序分析:     
2.程序源代码:
#include “stdio.h”
main()
{ FILE *fp;
char ch,filename[10];
scanf(“%s”,filename);
if((fp=fopen(filename,”w”))==NULL)
{printf(“cannot open file\n”);
exit(0);}
ch=getchar();
ch=getchar();
while(ch!=’#')
{fputc(ch,fp);putchar(ch);
ch=getchar();
}
fclose(fp);
}
==============================================================
【程序98】
题目:从键盘输入一个字符串,将小写字母全部转换成大写字母,然后输出到一个磁盘文件“test”中保存。
   输入的字符串以!结束。
1.程序分析:
2.程序源代码:
#include “stdio.h”
main()
{FILE *fp;
char str[100],filename[10];
int i=0;
if((fp=fopen(“test”,”w”))==NULL)
{ printf(“cannot open the file\n”);
exit(0);}
printf(“please input a string:\n”);
gets(str);
while(str[i]!=’!')
{ if(str[i]>=’a'&&str[i]<=’z')
str[i]=str[i]-32;
fputc(str[i],fp);
i++;}
fclose(fp);
fp=fopen(“test”,”r”);
fgets(str,strlen(str)+1,fp);
printf(“%s\n”,str);
fclose(fp);
}
==============================================================
【程序99】
题目:有两个磁盘文件A和B,各存放一行字母,要求把这两个文件中的信息合并(按字母顺序排列),
   输出到一个新文件C中。
1.程序分析:
2.程序源代码:
#include “stdio.h”
main()
{ FILE *fp;
int i,j,n,ni;
char c[160],t,ch;
if((fp=fopen(“A”,”r”))==NULL)
{printf(“file A cannot be opened\n”);
exit(0);}
printf(“\n A contents are :\n”);
for(i=0;(ch=fgetc(fp))!=EOF;i++)
{c[i]=ch;
putchar(c[i]);
}
fclose(fp);
ni=i;
if((fp=fopen(“B”,”r”))==NULL)
{printf(“file B cannot be opened\n”);
exit(0);}
printf(“\n B contents are :\n”);
for(i=0;(ch=fgetc(fp))!=EOF;i++)
{c[i]=ch;
putchar(c[i]);
}
fclose(fp);
n=i;
for(i=0;i<n;i++)
for(j=i+1;j<n;j++)
if(c[i]>c[j])
{t=c[i];c[i]=c[j];c[j]=t;}
printf(“\n C file is:\n”);
fp=fopen(“C”,”w”);
for(i=0;i<n;i++)
{ putc(c[i],fp);
putchar(c[i]);
}
fclose(fp);
}
==============================================================
【程序100】
题目:有五个学生,每个学生有3门课的成绩,从键盘输入以上数据(包括学生号,姓名,三门课成绩),计算出
   平均成绩,况原有的数据和计算出的平均分数存放在磁盘文件”stud”中。
1.程序分析:
2.程序源代码:
#include “stdio.h”
struct student
{ char num[6];
char name[8];
int score[3];
float avr;
} stu[5];
main()
{int i,j,sum;
FILE *fp;
/*input*/
for(i=0;i<5;i++)
{ printf(“\n please input No. %d score:\n”,i);
printf(“stuNo:”);
scanf(“%s”,stu[i].num);
printf(“name:”);
scanf(“%s”,stu[i].name);
sum=0;
for(j=0;j<3;j++)
{ printf(“score %d.”,j+1);
scanf(“%d”,&stu[i].score[j]);
sum+=stu[i].score[j];
}
stu[i].avr=sum/3.0;
}
fp=fopen(“stud”,”w”);
for(i=0;i<5;i++)
if(fwrite(&stu[i],sizeof(struct student),1,fp)!=1)
printf(“file write error\n”);
fclose(fp);
}

经典c程序100例==81–90

【程序81】
题目:809*??=800*??+9*??+1 其中??代表的两位数,8*??的结果为两位数,9*??的结果为3位数。求??代表的两位数,及809*??后的结果。
1.程序分析:
2.程序源代码:
output(long b,long i)
{ printf(“\n%ld/%ld=809*%ld+%ld”,b,i,i,b%i);
}
main()
{long int a,b,i;
a=809;
for(i=10;i<100;i++)
{b=i*a+1;
if(b>=1000&&b<=10000&&8*i<100&&9*i>=100)
output(b,i); }
}
==============================================================
【程序82】
题目:八进制转换为十进制
1.程序分析:           
2.程序源代码:
main()
{ char *p,s[6];int n;
p=s;
gets(p);
n=0;
while(*(p)!=’\0′)
{n=n*8+*p-’0′;
p++;}
printf(“%d”,n);
}
==============================================================
【程序83】
题目:求0—7所能组成的奇数个数。
1.程序分析:
2.程序源代码:
main()
{
long sum=4,s=4;
int j;
for(j=2;j<=8;j++)/*j is place of number*/
{ printf(“\n%ld”,sum);
if(j<=2)
s*=7;
else
s*=8;
sum+=s;}
printf(“\nsum=%ld”,sum);
}
==============================================================
【程序84】
题目:一个偶数总能表示为两个素数之和。
1.程序分析:
2.程序源代码:
#include “stdio.h”
#include “math.h”
main()
{ int a,b,c,d;
scanf(“%d”,&a);
for(b=3;b<=a/2;b+=2)
{ for(c=2;c<=sqrt(b);c++)
if(b%c==0) break;
if(c>sqrt(b))
d=a-b;
else
break;
for(c=2;c<=sqrt(d);c++)
if(d%c==0) break;
if(c>sqrt(d))
printf(“%d=%d+%d\n”,a,b,d);
}
}
==============================================================
【程序85】
题目:判断一个素数能被几个9整除
1.程序分析:
2.程序源代码:
main()
{ long int m9=9,sum=9;
int zi,n1=1,c9=1;
scanf(“%d”,&zi);
while(n1!=0)
{ if(!(sum%zi))
n1=0;
else
{m9=m9*10;
sum=sum+m9;
c9++;
}
}
printf(“%ld,can be divided by %d \”9\”",sum,c9);
}
==============================================================
【程序86】
题目:两个字符串连接程序
1.程序分析:
2.程序源代码:
#include “stdio.h”
main()
{char a[]=”acegikm”;
char b[]=”bdfhjlnpq”;
char c[80],*p;
int i=0,j=0,k=0;
while(a[i]!=’\0′&&b[j]!=’\0′)
{if (a[i] { c[k]=a[i];i++;}
else
c[k]=b[j++];
k++;
}
c[k]=’\0′;
if(a[i]==’\0′)
p=b+j;
else
p=a+i;
strcat(c,p);
puts(c);
}
==============================================================
【程序87】
题目:回答结果(结构体变量传递)
1.程序分析:     
2.程序源代码:
#include “stdio.h”
struct student
{ int x;
char c;
} a;
main()
{a.x=3;
a.c=’a';
f(a);
printf(“%d,%c”,a.x,a.c);
}
f(struct student b)
{
b.x=20;
b.c=’y';
}
==============================================================
【程序88】
题目:读取7个数(1—50)的整数值,每读取一个值,程序打印出该值个数的*。
1.程序分析:
2.程序源代码:
main()
{int i,a,n=1;
while(n<=7)
{ do {
   scanf(“%d”,&a);
   }while(a<1||a>50);
for(i=1;i<=a;i++)
 printf(“*”);
printf(“\n”);
n++;}
getch();
}
==============================================================
【程序89】
题目:某个公司采用公用电话传递数据,数据是四位的整数,在传递过程中是加密的,加密规则如下:
   每位数字都加上5,然后用和除以10的余数代替该数字,再将第一位和第四位交换,第二位和第三位交换。
1.程序分析:
2.程序源代码:
main()
{int a,i,aa[4],t;
scanf(“%d”,&a);
aa[0]=a%10;
aa[1]=a%100/10;
aa[2]=a%1000/100;
aa[3]=a/1000;
for(i=0;i<=3;i++)
 {aa[i]+=5;
 aa[i]%=10;
 }
for(i=0;i<=3/2;i++)
 {t=aa[i];
 aa[i]=aa[3-i];
 aa[3-i]=t;
 }
for(i=3;i>=0;i–)
printf(“%d”,aa[i]);
}
==============================================================
【程序90】
题目:专升本一题,读结果。
1.程序分析:
2.程序源代码:
#include “stdio.h”
#define M 5
main()
{int a[M]={1,2,3,4,5};
int i,j,t;
i=0;j=M-1;
while(i {t=*(a+i);
*(a+i)=*(a+j);
*(a+j)=t;
i++;j–;
}
for(i=0;i printf(“%d”,*(a+i));
}