面的了解仓库情况。
数据库设计
我们设计的数据库共有 6 个表,分别是:用户信息表、供应商信息表、库存表、入库信息表、 出库信息表、商品信息表。其中库存表与入库出库表有直接的关系,当每执行一次入库还是出库的操 作的时候,库存表的信息都要发生改变,三者是有联系的,我们做的这个不是很智能只是通过对数据 的修改来完成这个入库出库的操作。每次入库的时候都要核对供应商的信息以防止发生错误,在出库 的时候也要查询是否有库存有的话才能进行出库,反之则不能进行出库。
计算机与信息工程 2/10
《Delphi 程序设计》设计型实验报告
如下所示各个表的数据字段: 商品信息表: 字段名 商品编号 商品名 商品型号 商品类型 制购类型 提前期 批量 日期 类型 Varchar(10) Varchar(20) Varchar(20) Varchar(10) Varchar(10) 时间日期 int 时间日期 说明 商品编号 商品名 规格型号 种类 制购类型 提前的日期 量 时间
用户信息表: 字段名 编号 用户名 性别 职务 登录名 密码 状态 类型 varchar(4) Varchar(10) Varchar(2) Varchar(10) Varchar(10) Varchar(10) Varchar(4) 说明 编号 用户 性别 职务 登录名 密码 是否激活
供应商信息: 字段名 供应商ID 厂商名称 联系人 公司地址 电话 邮政编码 传真 电子信箱 备 注 省市自治区 类型 Varchar(4) Varchar(20) Varchar(10) Varchar(50) Varchar(20)
Varchar(10) Varchar(20) Varchar(20) Varchar(200) Varchar(10) 说明 ID 厂商名称 联 络 人 公司地址 电话 邮政编码 传真 电子信箱 备 注 归属地
计算机与信息工程
3/10
《
Delphi 程序
设计》设计型实验
报告 库存信息表: 字段名 商品名称 商品编号 商品规格 商品单价 当前库存量 类型 Varchar(20) Varchar(20) Varchar(10) 货币 int 说明 商品名 商品编号 规格 商品单价 当前库存量
入库信息表: 字段名 入库编号 商品编号 商品名称 供应商编号 商品单位 商品单价 商品数量 入库时间 经办人 备注 类型 Varchar(10) Varchar(20) Varchar(20) Varchar(20) Varchar(20) 货币 数字 时间日期 Varchar(10) Varchar(50) 说明 入库编号 商品编号 商品名 供应商编号 规格型号 单价 商品数量 时间 管理员 备注
出库信息表: 字段名 出库编号 商品编号 商品名称 商品单位 商品单价 商品数量 出库时间 经办人 备注 类型 Varchar(10) Varchar(20) Varchar(20) Varchar(20) 货币 数字 时间日期 Varchar(10) Varchar(50) 说明 入库编号 商品编号 商品名 规格型号 单价 商品数量 时间 管理员 备注
计算机与信息工程
4/10
《Delphi
程序设计》设计型实验报告
系统实现
我们的设计使用 delphi 来做的,所以每一块都是采用的 delphi 的简单的设计思想,由于能力 有限做的只是从一个窗口打开到另外一个窗口的操作,同一个界面只能进行此时的操作,不能同时打 开多个窗体进行操作。总共是六个模块,完成这个系统,每个部分完成相应的功能。开始的系统分析 中已经分析过了, 我们的这个系统是面向人的一个操作的, 由人来触发操纵这个系统管理相应的数据。 我们要实现的是对人员信息,商品信息、供应商信息还有就是出库入库的操作,最后还有就是查询的 操作,整个系统就算是完了
四重点难点
我们在这个系统的整个的编写过程中遇到了很多的问题,具体的简单问题如下: (1)在刚刚开始的时候,我们不知道可以建立一个共有的数据库的连接,所以在建一个窗体的时候 我们就连接一次数据库后来通过和别人的交流,知道要建一个公共的连接,所以后来才有了现在的公 共的连接的一个 form,数据库连接好之后还是有问题总是显示不出来,每次都是的总是显示不出来, 原因是 adoquery 的 active 每次都不会自动的置为 true 而是必须我自己修改一下保存了之后就变为 true,运行一次就要变一次,所以每次运行之前还都要从新设置一下。 (2)在我们对这个系统进行数据