中小型药店进销存
管理系统
姓名：万琪
学号：20138328
年级：13本科
专业：计算机科学与技术
正文目录
当今社会正面临着三大革命的挑战：全球贸易自由化为主的市场革命，以信息技术为核心的科技革命和以提高人力资本增值为核心的管理革命。据悉，我国国民经济和社会发展第十个五年计划已经将国民经济和社会信息化作为覆盖现代化建设全局的战略举措，要求加速发展信息产业，大力推进信息化。现在信息技术的应用越来越普及，不但促进了社会的高速发展，也改变着人们的工作、学习、生活和娱乐的方式以及思想观念。随着计算机的日益普及，计算机软件也无处不在。软件在计算机的发展和应用中至关重要，在人类进入信息化社会时成为新兴信息产业的支柱。
随着经济危机对全球影响的加深，市场竞争在各个行业中都日益激烈，广大的企业管理者渐渐意识到，仅仅依靠节约生产、销售或运输成本产生利润的上升空间越来越小，企业需要开始向管理要利润，需要依靠高效的管理和优化的工作流程打造企业核心竞争力。于是，企业为了实现对自身的物流、资金流、信息流一体化进行系统管理，建立在信息技术基础上的进销存管理系统应运而生。所谓管理信息系统，是一个由人、计算机等组成的能进行管理信息收集、传递、储存、加工、维护和使用的系统。管理信息系统能实测企业的各种运行情况，利用过去的数据预测未来，从全局出发辅助企业进行决策，利用信息控制企业的行为，帮助企业实现其规划目标。所以说，使用进销存管理系统，管理者可以随时了解到本单位、本部门准确、实时的业务数据、成本情况、利润情况等，还可以充分了解到进货经营情况，以便及时调整经营思路、销售策略、进货策略等。而对于规模不等的大中小型企业，信息化程度也会有所不同。具体而言，中小型企业在利用信息化技术加强企业管理方面与那些大型企业仍然有不小的差距，进销存管理软件解决了采购、销售、仓储活动中遇到的一些相关信息的录入、统计、查询等方面的实际问题，实现操作者的简便输入、快速查询、有效记账。
对于医药行业，成千上万药品的进货、销售、生产日期的有效查询使包括管理者、销售者业务员等人在内的许多药品系统相关人员难于操作管理。针对这种情况，我设计了一个专门为中小型药房量身打造的药品进销存管理系统，方便中小型药房的企业管理者，力求降低管理方面的成本，提高企业的核心竞争力，尽早进入快捷、高效的信息化时代。
本系统是针对中小型药房量身打造的进销存系统，主要负责药房进货信息、入库信息、销售信息、退货信息、库存信息的管理。该系统主要包括系统设置、基础资料、采购管理、入库管理、销售管理、退货管理、库存盘点、药库查询以及简单的针对进销存业务的财务清算等主要功能模块。本系统贯穿整个进销存业务的始末，使用本系统可以轻松地处理进货、入库、销售、退货、盘点等业务流程。
本系统采用是采用Delphi 2005作为编程工具，以SQL Server 2005作为后台数据库。操作简单易记，维护方便。
Delphi，是Windows平台下著名的快速应用程序开发工具(Rapid Application Development，简称RAD)。它的前身就是DOS时代盛行一时的“BorlandTurbo Pascal”，最早的版本是1995年由美国Borland（宝兰）公司开发。经过多年的发展，此产品也转移至Embarcadero公司旗下。Delphi是一个Intergrated Development Environment（集成开发坏境，简称IDE），使用的核心是由传统Pascal语言发展而来的Object Pascal，以图形用户界面为开发环境，透过IDE、VCL工具与编译器，配合连结数据库的功能，构成一个以面向对象程序设计为中心的应用程序开发工具。
Delphi是一个在引进了10年以后仍然拥有非常现代的体系结构和一大批追随者的开发工具，而且也是一个既适用于Win16 API与Win32 API，又适用于Linux操作系统和Microsoft.NET Framework的面向对象编程与可视化编程的最佳组合。Delphi开发几乎涵盖了所有领域：可独立应用的简单程序、图形处理、数据库开发、客户/服务器与多层企业应用、企业内部网与因特网解决方案以及XWL与Web服务。
Delphi 2005继承了这个传统，并且拥有基于VCL的坚实基础。不仅如此，Delphi 2005还是一个革命性的版本，具有经过彻底翻新的集成开发环境、得到极大扩展的面向对象编程语言以及涵盖整个软件开发周期的许多Borland开发者工具。
(一)直接编译生成可执行代码，编译速度快。由于Delphi编译器采用了条件编译和选择链接技术，使用它生成的执行文件更加精炼，运行速度更快。在处理速度和存取服务器方面，Delphi的性能远远高于其他同类产品。
(二)支持将存取规则分别交给客户机或服务器处理的两种方案，而且允许开发人员建立一个简单的部件或部件集合，封装起所有的规则，并独立于服务器和客户机，所有的数据转移通过这些部件来完成。这样，大大减少了对服务器的请求和网络上的数据传输量，提高了应用处理的速度。
(三)提供了许多快速方便的开发方法，使开发人员能用尽可能少的重复性工作完成各种不同的应用。利用项目模板和专家生成器可以很快建立项目的构架，然后根据用户的实际需要逐步完善。
(四)具有可重用性和可扩展性。开发人员不必再对诸如标签、按钮及对话框等Windows的常见部件进行编程。Delphi包含许多可以重复使用的部件，允许用户控制Windows的开发效果。
(五)具有强大的数据存取功能。它的数据处理工具BDE(Borland Database Engine)是一个标准的中介软件层，可以用来处理当前流行的数据格式，如xBase、Paradox等，也可以通过BDE的SQLLink直接与Sybase、SQLServer、Informix、Oracle等大型数据库连接。 Delphi既可用于开发系统软件，也适合于应用软件的开发。
(六)拥有强大的网络开发能力，能够快速的开发B/S应用，它内置的IntraWeb和ExpressWeb使得对于网络的开发效率超过了其他任何的开发工具。
(七)Delphi使用独特的VCL类库，使得编写出的程序显得条理清晰，VCL是现在最优秀的类库，它使得Delphi在软件开发行业处于一个绝对领先的地位。用户可以按自己的需要，任意的构建、扩充、甚至是删减VCL，以满足不同的需要。
(八)Delphi 2005版本还加入了inline及for in loop等功能。把Borland Delphi.Net、Borland Delphi Win32、Borland C#、Enterprise Core Objects等环境和功能集成成一个开发工具，因此可以在单个IDE中在Win32和.NET开发环境中切换或同时进行。
SQL Sever 2005是一个全面的数据库平台, 是Microsoft公司推出的SQL Server 数据库管理系统的一个版本。具有使用方便,可伸缩性好与相关软件集成程度高等优点，可在大型多处理器的服务器等多种平台使用。
SQL Sever 数据库引擎的核心服务是存储、处理和保护数据，控制访问权限、快速处理事务，能满足企业内大量的数据应用需要，对高可用性提供有力支持[11]。
SQL语言集数据查询（data query）、数据操纵（data manipulation）、数据定义（data definition）和数据控制（data control）功能于一体，充分体现了关系数据语言的特点和优点：综合统一性，高度非过程化，面向集合的操作方式[12]。
SQL Sever 2005数据引擎是本系统数据管理解决方案的核心。SQL Server 2005结合分析、报表、集成和通知功能。可以运用数据引擎构建和部署经济有效的BI解决方案。
SQL Sever 2005有一下几个特性，为系统的开发提供了保障。第一，Common Language Runtime(CLR)集成，即可以使用 Microsoft.NET语言来开发数据库目标。第二，深入的XML集成，SQL Server 2005提供一种新的XML数据类型，使在SQL Server数据库中存储XML片段或文件成为可能。第三，基于异构数据集成的药品进销存系统的设计与实现Transact-SQL增强，新的查询类型和在交易过程中使用错误处理的功能，为开发人员在SQL Server查询开发方面提供了更高的灵活性和控制力[14]。
SQL Server数据平台具有如下优点：
（1）充分利用数据资产。
（2）提高生产效率。
（3）减少IT复杂性。
（4）降低总体拥有成本。
SQL Server 2005是一个全面的数据库平台，使用集成的商业智能工具提供了企业级的数据管理。SQ L Server 2005数据库引擎为关系数据和结构化数据提供了更安全可靠的存储功能，使得可以构建和管理用于业务的高性能数据应用程序。
(一)完全的 Web 支持
通过 Web 轻松访问数据。通过SQL Server 2005可以使用 HTTP 来向数据库发送查询、对数据库中存储的文档执行全文搜索、以及通过 Web 进行自然语言查询。
基于 Web 的强大而灵活的分析。SQL Server 2005 分析服务功能被扩展到了 Internet。可以通过 Web 浏览器来访问和控制多维数据。
(二)高度的可伸缩性和可靠性
使用 SQL Server 2005 可以获得非凡的可伸缩性和可靠性。通过向上伸缩和向外扩展的能力，SQL Server 满足了苛刻的电子商务和企业应用程序要求。
(三)集成和可扩展的分析服务
通过SQL Server 2005可以建立带有集成工具的端到端分析解决方案，从数据创造价值。此外，还可以根据分析结果自动驱动商业过程以及从最复杂的计算灵活地检索自定义结果集。
(四)快速开发、调试和数据转换
SQL Server 2005 带有交互式调节和调试查询、从任何数据源快速移动和转化数据、以及按 Transact
(五)简化的管理和调节-SQL 方式定义和使用函数等功能。程序人员可以从任意 Visual Studio 工具以可视化方式设计和编写数据库应用程序。
使用 SQL Server 2005可以很容易地在企业资源旁边集中管理数据库。可以在保持联机的同时轻松地在计算机间或实例间移动和复制数据库。
(六)企业级数据库
SQL Server 2005分布式查询使用户可以引用来自不同数据源的数据，而在进行这些数据引用时，会感觉它们是SQL Server 2005数据库的一部分同时，分布式事物还将保证每个单独的数据副本保持同步。
需求分析是软件开发必不可少的一项工作，不论采用哪种开发技术，首先都要弄清楚系统在功能、性能以及环境等方面的用户需求，将用户需求精准化、完全化的过程，保证开发出来的软件是否真正满足用户的需求。也是延长软件生命周期、减少软件开发费用的需求。
药品的进销存是一个复杂的系统工程，本系统主要用于调配和监管药品出库、入库、储存的管理工作，将部分复杂而琐碎的工作自动化，从而提高管理效率降低人员成本。
药品进销存管理系统能有效的对原本复杂、易错的管理进行改善，优化了管理方式与结构，减轻了管理人员的负担和出错率，提高了管理效率。对于开发一套简单实用，使用B/S架构的药品进销存管理系统是很有必要的。
本系统是针对中小型药房量身打造的进销存系统，主要负责药房进货信息、入库信息、销售信息、退货信息、库存信息的管理。该系统主要包括系统设置、基础资料、采购管理、入库管理、销售管理、退货管理、库存盘点、药库查询以及简单的针对进销存业务的财务清算等主要功能模块。本系统贯穿整个进销存业务的始末，使用本系统可以轻松地处理进货、入库、销售、退货、盘点等业务流程。
本系统采用是采用Delphi 2005作为编程工具，以SQL Server 2005作为后台数据库。操作简单易记，维护方便。
在经济上，本系统的开发成本不是很高，因为具有很好的灵活性和扩展性，所以该系统易于维护和升级，且后期维护升级的费用也不会很高，可使用寿命长，所以本系统在经济上是可行的。
药品经销存管理系统能让管理员时时有效的掌握药品进库、出库环节的药品流动方向，也能查询到现在仓库内存储药品详细信息，能对药品进行有效的管理。
这个系统主要实现的是药品进销存管理，在得到身份得到验证后，用户可以在该系统进行药品信息的管理。用户在登录系统后，系统允许用户对系统中的有关内容进行增删改等操作，并调用数据库中的相关数据完成操作。
需求分析是为了确定软件设计的细节、功能和性能，是软件生存期中的重要一环。能更大的满足用户的而需求，延长软件生命周期、减少软件开发的费用。
本系统中，管理员才有最高的权限，管理员要经过身份验证才能进入系统，可以进行全部操作，其他用户只能以游客身份登录，只能浏览查询，保证了系统的安全性。系统需要有良好的安全性和操作性。
药品进销存管理系统的主要功能是对药品的进、销、存进行管理。以达到降低成本、提高效率、改进服务等目的。利用药品进销存管理系统可以在以下几方面提高企业管理水平:
提高工作效率，降低成本。
使得仓库存放药品更有规划、更合理调配药品。
使得管理人员更精简，分工更细致。
实现数据的智能分析。
（1）系统登录功能:
管理员提供用户名和密码，才能登录，保证了数据的安全性和保密性。其余用户只能用游客登录。
（2）密码修改模块:
该模块主要让管理员时常修改密码，是密码被他人所知。
（3）基础模块:
该模块主要包括了药品进、销、存的入库管理、出库管理、库存管理三个部分。
药品入库管理主要是针对入库药品进行登记修改操作，包括药品进库的时间，品种，数量，生产企业，保质期，有无损坏，经手人签名等信息进行登记。
药品出库管理主要是对出库药品进行登记修改，其中包括药品出库时间，品种，数量，生产企业，经手人等信息进行登记。
药品库存管理是对药品入库、出库后产生的数量变化自动改变，也能进行一系列的查询，包括药品名称，入库时间，出库时间，数量，生产企业，保质期，经手人，是否需要补充等信息。
本系统要求界面简单美观，添加时可以让人一眼看出哪里该填写什么，查询时可以让人一目了然自己要看的信息。该系统设计要求信息查询方便、灵活、可靠、易于操作，数据存储安全可靠，程序易于后期维护。
一个简单的进销存管理系统，至少应该有进、销、存3个方面的功能，如果是一个完善的系统，还应该有调、转、赚以及简单的统计报表功能。系统以目标不同用户登录账号权限不同，物流配送管理系统主要分为系统管理、药品信息、入库管理、出库管理、车库存管理等5个模块。各模块的需求如下：
图3.1 功能结构图
从中小型企业的实际情况出发，所以我将中小型药房进销存管理系统的功能模块可以分为九个：系统设置、基础资料、采购管理、入库管理、销售管理、退货管理、库存盘点、药库查询以及财务结算。
系统设置：管理员（老板）能够管理所有用户的基本信息，包括用户名、密码的删除（解雇），添加（聘请）等权限、同时可以管理所有药品的基本信息、数据的添加，修改，删除等信息。
基础资料：普通用户（业务员）能够查看管理药品的基本信息资料，包括药品名称、药品描述、药品单位、药品保质期以及药品的用法说明等信息，按着国家药品分类的相关政策，根据药品内含成分。作用（功效）、剂型、规格、存储要求、不良反应等进行药学分类；只有管理员（老板）能够查看修改所有供药厂商的基本信息资料，包括厂商名称、联系地址、联系电话和厂商负责人等信息。
采购管理：管理员（老板）和普通用用户（采购员）能够管理药房内药品采购信息，包括采购单的建立、审核、打印和备份，普通用户（采购员）不可以查询药品进货渠道，药品进价信息，管理员(老板)可以。
入库管理：普通用户（采购员）能够管理药房内药品入库信息，包括入库批次、入库的日期以及入库单审核、打印等功能，当有药品入库是，及时更新药品数据信息。
销售管理：普通用户（业务员）能够管理药房内药品销售信息，包括销售单的建立、审核和打印。
退货管理：普通用户（业务员）能够管理药房内药品退货信息，包括退货单的建立、审核和打印。
盘点管理：普通用户（采购员）能够管理药房内药品销售信息，维护库存的准确性，对库存进行盘点等功能，（当高于库存上限和低于库存下限的药品警告提示，及时汇报给老板、防止库存不足，或库存积压等情况），维持药店出售药品能够正常运行。
药库查询：管理员（老板）能够快速地查询药库内总的药品信息，包括剩余量，销售量等。
财务结算：系统能够计算整个进销存业务过程中的盈利或亏损，管理员（老板）可以查看并且可以打印账目清单，维持药店出售药品能够正常运行。
本系统采用模块化设计思想，采用B/S架构实现，系统分为由BLL业务逻辑层、显示层、DAL数据访问层三部分构成。采用模块化设计的思想，系统设计自顶向下进行，把系统拆分成若干个模块，逐层深入，对子模块进行详细设计、编码，直至完成系统设计。
药品进销存管理是对数据进行管理，从而达到对药品进库、出库、存储等各环节信息进行时时管理，有效提高了管理效率，节约了劳动力。
药品进销存管理的业务流程如图3.2所示：
word/media/image1.gif图3.2 系统主要业流程
根据药品进销存系统的设计思想，本系统的功能包括：药品入库信息，药品库存信息，药品出库信息的输入，查询，添加 ，删除，修改和库存余额的查询。所以系统由药品信息设置，入库管理，出库管理和库存管理等模块组成。
为了完成药品入库的信息的精确，供应商应采购相应的药品，则需要以下两个表：
供应商信息表（供应商编号、供应商名称、地址、联系人、联系方式）
药品信息表（药品编号、药品类别、药品名称、规格、单位、批号、描述、上限、下限、用法、备注）
药品入库信息表（药品编号、药品名称、入库时间、数量、批发价、零售价、供应商编号、职工编号）
其关系的E-R图为：
word/media/image2.gif
为了完成药品库存的信息的精确，仓库存储相应药品，则需要表：
库存盘点表（药品编号、药品类别、药品名称、有效期、盘点数量）
其关系的E-R图为：
word/media/image3.gif
为了完成药品出库的信息的精确，药品供给相应的客户，则需要表：
销售明细表（销售编号、有效期、药品编号、销售价格、销售数量）
其关系的E-R图为：
word/media/image4.gif
综上所述系统的全局E-R图为：
word/media/image5.gif
为了保障系统的正确运行，应有正确的流程，本系统的程序流程如下图所示：
word/media/image6.gif
图3.4 总体联系
1.登录界面
点击进入后进入登录界面
界面设计如下：
其主要功能是用户和管理员两个权限的登录。
用户登录后，可以对采购管理，入库管理，退货管理，库存盘点，销售管理的增加，修改，删除，可以通过药品编号，类别，备注等方式查询
管理员登录后，可以对采购管理，入库管理，退货管理，库存盘点，销售管理，财务管理的增加，修改，删除，可以修改用户的权限用户名，密码等
该页面设计一个粉色背景，窗体内还有两的label控件,两个edit控件，两个按钮其文字属性为隶书，小二，粗体，灰色字，edit文字颜色为粉色
其次，登录窗体设计为不可放大缩小
登录按钮主要代码为：
if query1.FieldByName('密码').AsString=edit2.Text then
if query1.FieldByName('用户权限').AsString='管理员' then
begin
form2.Hide;
form3.show;
edit2.Text:='';
if query1.FieldByName('用户权限').AsString='用户' then
form2.Hide;
form4.show;
edit2.Text:='';
当用户密码输入错误时显示错误窗口界面如下：
完成此功能主要代码为:
showmessage('用户名或密码错误，亲重新输入！');
2.管理员界面
输入管理员用户面0001密码123
进入管理员界面
设计如下：
该页面设计一个粉色背景，窗体内还有MainMenu1控件,控件内内容为：
系统设置（用户设置）
基础资料（药品信息，供应商信息）
管理（采购管理，入库管理，退货管理，库存盘点，销售管理，财务管理）
关于
退出
窗口内还有两个Image控件，插入两个精美图片
管理员具有系统设置，基础资料查询，管理等功能。当点击时跳转页面
当点击关于是出现系统信息：
其主要代码为：
application.MessageBox('欢迎使用本系统!!!','版本信息',MB_ok);
3.用户设置界面
点击系统设置下的用户设置跳转页面
界面设置如下：
该页面设计一个粉色背景，窗体内还有MainMenu1控件,控件内内容为：
系统设置（用户设置）
基础资料（药品信息，供应商信息）
管理（采购管理，入库管理，退货管理，库存盘点，销售管理，财务管理）
关于
退出
窗体内还有一个DBGrid控件，三个的label控件,三个DBEdit控件，五个按钮其文字属性为隶书，小二，粗体，灰色字。
该页面可以对所有用户进行修改，删除，添加
其主要代码为：
table1.Append;
table1.Edit;
table1.Post;
table1.Delete;
table1.Cancel;
4.药品信息界面
点击基础资料下的药品信息进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件，一个DBComboBox控件（内容是中药，西药），11个的label控件,10个DBEdit控件，五个按钮其文字属性为隶书，小二，粗体，灰色字。
该页面实现对药品的进货退货等功能
主要代码为：
table1.Append;
table1.Edit;
table1.Post;
table1.Delete;
table1.Cancel;
5.采购管理界面
点击管理下的采购管理进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件， 6个的label控件,6个DBEdit控件，五个按钮其文字属性为隶书，小二，粗体，灰色字。
该页面实现对采购单子的修改删除增加等功能
主要代码为：
table1.Append;
table1.Edit;
table1.Post;
table1.Delete;
table1.Cancel;
6.退货管理界面
点击管理下的退货管理进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件， 6个的label控件,6个DBEdit控件，五个按钮其文字属性为隶书，小二，粗体，灰色字。
该页面实现对退货单子的修改删除增加等功能
主要代码为：
table1.Append;
table1.Edit;
table1.Post;
table1.Delete;
table1.Cancel;
7.销售管理界面
点击管理下的销售管理进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件， 8个的label控件,6个DBEdit控件，两个edit控件，2个按钮其文字属性为隶书，小二，粗体，灰色字。
当点击计算时可以计算出利润与总价并提交给药品利润表
提示提交成功
其主要代码为：
x:=strtofloat(dbedit4.text);
a:=strtofloat(dbedit5.text);
y:=strtofloat(dbedit6.text);
z:=(a-x)*y;
q:=a*y;
edit1.Text:=floattostr(z);
edit2.Text:=floattostr(q);
sql.Add('Insert into 药品利润表 (药品编号,药品名称,日期,进价,售价,数量,利润,总价) Values (:x1,:x2,:x3,:x4,:x5,:x6,:x7,:x8)');
ParamByName('x1').AsString:=dbedit1.Text;。。。
ParamByName('x7').AsFloat:=strtofloat(edit1.text);
ParamByName('x8').AsFloat:=strtofloat(edit2.text);
8.财务结账界面
点击管理下的财务结账进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件， 一个DateTimePicker控件，2个的edit控件，3个的label控件，5个按钮其文字属性为隶书，小二，粗体，灰色字。
点击小三角选择日期
在当点击日利润计算时可以计算出当天的利润并显示
在edit中输入2016/6可以计算月利润并显示
在edit中输入2016可以计算年利润并显示
完成此操作的主要代码为：
with query1 do
sql.Add('select sum(利润) 日总利润 from 药品利润表 where 日期=:x1');
ParamByName('x1').AsString:=datetostr(DateTimePicker1.Date);
sums:=fieldbyname('日总利润').AsString;
showmessage('日总利润'+sums);
with query1 do
sql.Add('select sum(利润) 月总利润 from 药品利润表 where 日期 like:x1');
ParamByName('x1').AsString:=edit1.Text+'%';
sums:=fieldbyname('月总利润').AsString;
sql.Add('select sum(利润) 年总利润 from 药品利润表 where 日期 like:x1');
ParamByName('x1').AsString:=edit2.Text+'%';
sums:=fieldbyname('年总利润').AsString;
9.用户界面
进入登录界面输入账号0002密码12进入用户页面
界面设计如下：
该页面设计一个粉色背景，窗体内还有MainMenu1控件,控件内内容为：
管理（采购管理，入库管理，退货管理，库存盘点，销售管理，财务管理）
基础资料（药品信息，供应商信息）
关于
退出
窗口内还有两个Image控件，插入两个精美图片
用户界面下的采购，销售，入库，退货，库存等功能与管理员相同，没有财务结账，新增相关查询选项
10．相关查询界面
点击用户界面下管理点击相关查询进入
界面设计如下：
该页面设计一个粉色背景，窗体内有一个DBGrid控件，一个PageControl控件，该控件内还有两个页面（页面名字分别为：信息查询，上下限查询）信息查询页面内含有三个ComboBox2控件，内容分别为（y0001/y0002，中药/西药，孕妇禁止服用/胃溃疡患者禁用） 3个的label控件,3个RadioButton控件（），3个按钮（开始搜索，开始查询，返回）其文字属性全部为隶书，小二，粗体，灰色字。
该界面实现输入药品编号，药品类别，备注搜索
点击信息查询进入
输入相应的编号类别备注点击开始搜索完成此操作
其主要代码为：
with query1 do
sql.Add('select * from 药品信息表.db where 药品类别=:x1 and 药品编号=:x2 and 备注=:x3' );
paramByName('x1').AsString:=combobox1.Text;
paramByName('x2').AsString:=combobox2.Text;
paramByName('x3').AsString:=combobox3.Text;
当搜索不到时显示界面
代码如下：
if query1.RecordCount>0 then
showmessage('您搜索的药品不存在，请重新搜索！！！！');
combobox1.ItemIndex:=-1;
combobox2.ItemIndex:=-1;
combobox3.ItemIndex:=-1;
当需要药品编号，药品类别，备注逐个搜索时
点击相应的查询完成此操作
其主要代码为：
if radiobutton1.Checked then
with query1 do
sql.Add('select * from 药品信息表 where 药品编号=:x1 ');
parambyName('x1').AsString:=ComboBox2.Text；
if radiobutton2.Checked then
begin
with query1 do
sql.Add('select * from 药品信息表 where 药品类别=:xm');
parambyName('xm').AsString:=ComboBox1.Text;
if radiobutton3.Checked then
with query1 do
sql.Add('select * from 药品信息表 where 备注=:xm');
parambyName('xm').AsString:=ComboBox3.Text;
点击上下限查询进入另一页面
该小页面内有一个DBGrid控件该控件， 2个RadioButton控件（超出上限查询，低于下限查询），2个按钮（开始查询，返回）其文字属性全部为隶书，小二，粗体，灰色字。
界面如下：
该界面实现超出上限，低于下限药品的查询
主要代码为：
if radiobutton4.Checked then
with query1 do
sql.Add('select * from 药品信息表.db where 上限>"10"');
open;
int1:=recordcount;
str1:=inttostr(int1);
showmessage('表中超出上限的记录共'+str1+'条');
if radiobutton5.Checked then with query1 do
begin
sql.Add('select * from 药品信息表.db where 下限<"10"');
open;
int1:=recordcount;
str1:=inttostr(int1);
showmessage('表中低于下限的记录共'+str1+'条');
系统测试主要是为了发现在程序设计过程中所存在的问题，并加以完善和改进，从而提高系统的实用性、可靠性和可维护性等。测试方法为黑盒测试和白盒测试。
为了有效的发现错误的存在，选用典型的测试数据，能有效地提高测试效率，降低成本，使测试更全面。
表1是对登录模块的测试。
在登录时我们发现用户只有正确用命名密码进入，当错误时系统出现瘫痪，为了更好地实现登录功能，我们完善了系统，在登录错误时出现错误提醒，重新输入。
测试目的：用户需要用有效的身份证明才能进入系统，错误时出现用户名密码错误提醒。
预期：有效的帐号和密码才可以进入系统管理界面 否刚不能进入出现重新输入的提醒。
表1 系统登录模块测试
虽然系统完善部分功能，但是仍有一些功能未能实现，如用户名为空时的提醒和enter键登录的功能
表2 是对药品管理模块进行的测试。
测试目的：可以对药品信息进行增加、修改、删除操作。
描述：管理员分别进行添加药品信息，修改药品信息，删除药品信息的操作。
预期：能成功进行添加、修改、删除。
表5.2 药品管理模块测试
表3是对用户相关查询模块进行的测试。
测试目的：用户可以根据药品编号，药品类别，备注搜索查询药品。
描述：用户先查询信息。
表5.3 用户药品相关查询模块测试
测试发现在搜索测试时，只能（药品编号为：y0001；药品类别：中药；
备注：孕妇禁止服用）三个选项同时出现才能搜索到药品，我们希望在搜索药品是可以通过一个选项或两个选项也能搜索到药品，为此我们使用了RadioButton控件来实现，
勾选不同的选项也可以搜索出药品。
对系统的每个程序段进行测试，分析程序段编写时是否存在语法等错误，并对重点程序段进行输入、输出测试，查找程序在编写中容易忽略的不足之处。一般系统都会存在用户登录，此系统也不例外。下面为其流程图：
对其进行语句覆盖法测试，测试如下：
根据用户登录的流程图，可知该程序有4条不同的路径，我们程序的入口标记为a，把密码及用户名正确的路径标记为b，把密码或用户名不正确的路径标记为c，把为超级用户的路径标记为d，把一般用户的路径标记为e，这里输入共有3项内容，即用户名、密码、超级用户，为测试用例的3个基本元素。对于用户名及密码的判断，当用户名正确时其真值为T1，假值为F1，当密码正确时其真值为T2，假值为F2，当是超级用户是其真值为T3，假值为F3。
对其建立的测试用例图如下：
1、功能性测试结果评价
2、非功能性测试结果评价
本文来源：https://www.2haoxitong.net/k/doc/b8f32431c9d376eeaeaad1f34693daef5ff713c2.html
文档为doc格式