if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[card]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[card]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[card_use]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[card_use]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[casual_card_use]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[casual_card_use]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[employee]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[employee]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[student]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[student]
GO
CREATE TABLE [dbo].[card] (
[card_id] [char] (5) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[user_id] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[create_date] [datetime] NULL ,
[money] [float] NULL ,
[state] [char] (1) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[card_use] (
[card_use_id] [int] NOT NULL ,
[card_id] [char] (5) COLLATE Chinese_PRC_CI_AS NULL ,
[money] [float] NULL ,
[use_date] [smalldatetime] NULL
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[casual_card_use] (
[card_id] [char] (8) COLLATE Chinese_PRC_CI_AS NULL ,
[money] [float] NULL ,
[use_date] [smalldatetime] NULL
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[employee] (
[account] [varchar] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[password] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL ,
[name] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[student] (
[user_id] [varchar] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[name] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL ,
[age] [decimal](18, 0) NULL ,
[address] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY]
GO
没有合适的资源?快使用搜索试试~ 我知道了~
Delphi高校餐饮银卡系统源代码
共49个文件
pas:15个
dfm:13个
dcu:13个
3星 · 超过75%的资源 需积分: 10 10 下载量 16 浏览量
2012-08-09
18:18:37
上传
评论 1
收藏 406KB RAR 举报
温馨提示
摘要:Delphi源码,数据库应用,银卡系统,餐饮系统 Delphi高校餐饮银卡系统源代码,实际上是一个基于SQL的银卡信息管理系统,可以办新卡、挂失卡、解挂、存钱、输临时卡、特殊修改功能、修改密码等,但是多了一个比较重要的系统,读卡机,本系统可与读卡机连接,直接读取卡信息后连接数据库进行比对,比较智能化了,源码实例编译后的功能截图如上所示。
资源推荐
资源详情
资源评论
收起资源包目录
17889.rar (49个子文件)
codefans.net
高校餐饮银卡系统
sql
card.sql 4KB
Cardlogon.pas 3KB
CardLoginForm.dcu 6KB
ChangePassword.pas 2KB
MainForm.pas 2KB
AddMoneyForm.pas 7KB
Card.exe.KBK 815KB
DTS_Data.mdb 260KB
ModifyForm.dfm 6KB
AddMoneyForm.dcu 11KB
NewCardForm.dcu 16KB
CasualCardForm.dcu 9KB
Card.res 876B
CardDM.dcu 3KB
ChangePasswordForm.dfm 5KB
CasualCardForm.pas 6KB
ConfigForm.dfm 5KB
Cardlogon.dfm 15KB
ModifyForm.dcu 14KB
ConfigForm.dcu 8KB
AddMoneyForm.dfm 3KB
CardLoginForm.dfm 5KB
ModifyFeeForm.dfm 2KB
NewCardForm.pas 13KB
ChangePasswordForm.dcu 8KB
CardLoginForm.pas 3KB
ChangePassword.dfm 4KB
Card.dof 1KB
LoseForm.pas 5KB
ModifyFeeForm.dcu 4KB
LoseForm.dcu 8KB
LoseForm.dfm 5KB
Card.cfg 386B
MainForm.dcu 6KB
FuntionUnit.pas 1KB
ModifyFeeForm.pas 1KB
Card.dpr 2KB
ModifyForm.pas 11KB
FunctionUnit.dcu 2KB
FuntionUnit.dcu 1KB
CardDM.pas 1KB
NewCardForm.dfm 4KB
CardDM.dfm 3KB
CardDM.dti 511B
CasualCardForm.dfm 1KB
ChangePasswordForm.pas 4KB
FunctionUnit.pas 3KB
ConfigForm.pas 5KB
MainForm.dfm 23KB
共 49 条
- 1
资源评论
- W2246262013-01-05为什么都是乱码。。
ixiaokangoks
- 粉丝: 14
- 资源: 365
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功