DELPHI物资管理系统+文献综述+开题报告+源码+答辩PPT
系统的总体设计这个管理系统从4月1日开始着手设计开发,经过一段时间的分析,并根据对水电管理的具体要求及需要本软件实现的功能,将本软件分为5个大的模块,分别是:第一部分:文件模块;第二部分:编辑模块;第三部分:工具模块; 第四部分:初始模块;第五部分:帮助模块。
程序流程图如下:本文来自辣*文.论,文|网
3 本程序的技术实现及具体功能
3.1 登录的界面与程序设计实现
object HYForm: THYForm
Left = 58
Top = 116
Width = 1014
Height = 612
Caption = '海运费用'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 1006
Height = 578
ActivePage = TabSheet4
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
Caption = '其它费用'
object DBGrid3: TDBGrid
Left = 0
Top = 89
Width = 998
Height = 418
Align = alClient
Color = clInfoBk
Ctl3D = False
DataSource = DM.OTHERSource
ImeName = '中文 (简体) - 智能 ABC'
ParentCtl3D = False
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid3CellClick
OnKeyDown = DBGrid3KeyDown
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_ID'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Title.Alignment = taCenter
Title.Caption = '提单号'
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_DANWEI'
Title.Alignment = taCenter
Title.Caption = '单位'
Width = 150
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_HUO'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Title.Alignment = taCenter
Title.Caption = '货名'
毕业论文http://www.751com.cn
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_CHAN'
Title.Alignment = taCenter
Title.Caption = '船名/船次'
Width = 65
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_BOX'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Title.Alignment = taCenter
Title.Caption = '箱型'
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'OTHER_NUM'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText1448