📄 sj_txpfhdck.dfm
字号:
inherited frm_TXPFHDCK: Tfrm_TXPFHDCK
Tag = 62200
Left = 68
Top = 2
Caption = '邮资票品管理信息系统——库房管理'
ClientHeight = 509
ClientWidth = 748
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
object ModiPanel1: TModiPanel
Left = 0
Top = 478
Width = 748
Height = 31
Align = alBottom
BevelOuter = bvLowered
TabOrder = 0
DisButton = [bnEdit, bnSave, bnCancel, bnClose]
BtnWidth = 65
OnBtnClick = ModiPanel1BtnClick
object BitBtn5: TBitBtn
Left = 198
Top = 3
Width = 71
Height = 25
Caption = '复核(&H)'
TabOrder = 7
OnClick = BitBtn5Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn6: TBitBtn
Left = 269
Top = 3
Width = 94
Height = 25
Caption = '全部复核(&A)'
TabOrder = 8
OnClick = BitBtn6Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BBt_Send: TBitBtn
Left = 363
Top = 3
Width = 69
Height = 25
Caption = '发送(&T)'
TabOrder = 9
OnClick = BBt_SendClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
333333333333337FF3333333333333903333333333333377FF33333333333399
03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
3333777777333333333333333333333333333333333333333333}
NumGlyphs = 2
end
end
object Panel1: TPanel
Left = 0
Top = 38
Width = 218
Height = 440
Align = alLeft
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 5
Top = 15
Width = 48
Height = 12
Caption = '查询日期'
end
object DBGrid2: TDBGrid
Left = 1
Top = 42
Width = 216
Height = 397
Align = alBottom
DataSource = DataSource2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnDrawColumnCell = DBGrid2DrawColumnCell
Columns = <
item
Expanded = False
FieldName = 'KDRQ'
Title.Caption = '日期'
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'DWMC'
Title.Caption = '去向单位'
Width = 107
Visible = True
end>
end
object BitBtn7: TBitBtn
Left = 155
Top = 9
Width = 50
Height = 25
Caption = '查询'
TabOrder = 1
OnClick = BitBtn7Click
end
object DateEdit1: TDateEdit
Left = 59
Top = 11
Width = 91
Height = 21
ButtonWidth = 16
NumGlyphs = 2
PopupFont.Charset = DEFAULT_CHARSET
PopupFont.Color = clWindowText
PopupFont.Height = -11
PopupFont.Name = 'MS Sans Serif'
PopupFont.Style = []
YearDigits = dyFour
TabOrder = 2
end
end
object Panel2: TPanel
Left = 218
Top = 38
Width = 530
Height = 440
Align = alClient
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 2
object Label2: TLabel
Left = 21
Top = 17
Width = 48
Height = 12
Caption = '发货单号'
end
object Label3: TLabel
Left = 21
Top = 40
Width = 48
Height = 12
Caption = '开单日期'
end
object Label4: TLabel
Left = 369
Top = 18
Width = 48
Height = 12
Caption = '出库性质'
end
object Label5: TLabel
Left = 223
Top = 40
Width = 36
Height = 12
Caption = '制表人'
end
object Label7: TLabel
Left = 44
Top = 87
Width = 24
Height = 12
Caption = '备注'
end
object Label9: TLabel
Left = 381
Top = 40
Width = 36
Height = 12
Caption = '库管员'
end
object Label10: TLabel
Left = 20
Top = 63
Width = 48
Height = 12
Caption = '出库日期'
end
object Label11: TLabel
Left = 213
Top = 64
Width = 48
Height = 12
Caption = '装票日期'
end
object Label12: TLabel
Left = 370
Top = 64
Width = 48
Height = 12
Caption = '封装袋数'
end
object DBEdit2: TDBEdit
Left = 75
Top = 36
Width = 86
Height = 20
Color = clMenu
DataField = 'KDRQ'
DataSource = DataSource2
ReadOnly = True
TabOrder = 0
end
object DBEdit3: TDBEdit
Left = 422
Top = 13
Width = 99
Height = 20
Color = clMenu
DataField = 'RCKXZMC'
DataSource = DataSource2
ReadOnly = True
TabOrder = 1
end
object DBEdit4: TDBEdit
Left = 265
Top = 36
Width = 90
Height = 20
Color = clMenu
DataField = 'ZBR'
DataSource = DataSource2
ReadOnly = True
TabOrder = 2
end
object DBEdit6: TDBEdit
Left = 75
Top = 13
Width = 280
Height = 20
Color = clMenu
DataField = 'FHDH'
DataSource = DataSource2
ReadOnly = True
TabOrder = 3
end
object DBEdit7: TDBEdit
Left = 75
Top = 83
Width = 446
Height = 20
DataField = 'BZ'
DataSource = DataSource2
TabOrder = 4
end
object DBEdit8: TDBEdit
Left = 423
Top = 36
Width = 98
Height = 20
Color = clMenu
DataField = 'HDR'
DataSource = DataSource2
ReadOnly = True
TabOrder = 5
end
object DBDateEdit1: TDBDateEdit
Left = 75
Top = 59
Width = 88
Height = 21
DataField = 'CKRQ'
DataSource = DataSource2
ButtonWidth = 16
NumGlyphs = 2
TabOrder = 6
YearDigits = dyFour
end
object DBDateEdit2: TDBDateEdit
Left = 266
Top = 59
Width = 90
Height = 21
DataField = 'ZPRQ'
DataSource = DataSource2
ButtonWidth = 16
NumGlyphs = 2
TabOrder = 7
YearDigits = dyFour
end
object RxDBCalcEdit1: TRxDBCalcEdit
Left = 423
Top = 59
Width = 41
Height = 21
DataField = 'FZDS'
DataSource = DataSource2
DecimalPlaces = 15
ButtonWidth = 0
NumGlyphs = 2
TabOrder = 8
end
object DBGrid1: TDBGrid
Left = 9
Top = 213
Width = 432
Height = 75
DataSource = DataSource4
TabOrder = 9
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Visible = False
Columns = <
item
Expanded = False
FieldName = 'DZBH'
Title.Caption = '编号'
Width = 96
Visible = True
end
item
Expanded = False
FieldName = 'DZZL'
Title.Caption = '重量(千克)'
Width = 74
Visible = True
end
item
Expanded = False
FieldName = 'YSJE'
Title.Caption = '运输金额(元)'
Width = 86
Visible = True
end>
end
object BitBtn3: TBitBtn
Left = 162
Top = 254
Width = 70
Height = 25
Caption = '增加'
TabOrder = 10
Visible = False
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 262
Top = 254
Width = 70
Height = 25
Caption = '删除'
TabOrder = 11
Visible = False
OnClick = BitBtn4Click
end
object DBGrid4: TDBGrid
Left = 9
Top = 184
Width = 432
Height = 125
DataSource = DataSource5
TabOrder = 12
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Color = cl3DLight
Expanded = False
FieldName = 'ZH'
ReadOnly = True
Title.Caption = '志号'
Width = 71
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'TJC'
ReadOnly = True
Title.Caption = '票品名称'
Width = 109
Visible = True
end
item
Expanded = False
FieldName = 'bz'
Title.Caption = '版名称'
Width = 69
Visible = True
end
item
Expanded = False
FieldName = 'QSBH'
Title.Caption = '起始版号'
Visible = True
end
item
Expanded = False
FieldName = 'ZZBH'
Title.Caption = '终止版号'
Width = 71
Visible = True
end>
end
object BitBtn1: TBitBtn
Left = 450
Top = 252
Width = 70
Height = 25
Caption = '增加'
TabOrder = 13
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 450
Top = 284
Width = 70
Height = 25
Caption = '删除'
TabOrder = 14
OnClick = BitBtn2Click
end
object DBGrid3: TDBGrid
Left = 9
Top = 316
Width = 521
Height = 121
DataSource = DataSource3
Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
TabOrder = 15
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Color = cl3DLight
Expanded = False
FieldName = 'ZH'
ReadOnly = True
Title.Caption = '志号'
Width = 68
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'TJC'
ReadOnly = True
Title.Caption = '名称'
Width = 100
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'MZ'
ReadOnly = True
Title.Caption = '面值'
Width = 45
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'JJ'
ReadOnly = True
Title.Caption = '进价'
Width = 44
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'SL'
ReadOnly = True
Title.Caption = '数量'
Width = 75
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'KFMC'
ReadOnly = True
Title.Caption = '库房'
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'KWH'
Title.Caption = '库位'
Width = 94
Visible = True
end>
end
object Panel5: TPanel
Left = 11
Top = 120
Width = 513
Height = 57
BevelOuter = bvNone
TabOrder = 16
object Label6: TLabel
Left = 48
Top = 13
Width = 12
Height = 12
Alignment = taRightJustify
Caption = '版'
end
object Label13: TLabel
Left = 12
Top = 37
Width = 48
Height = 12
Alignment = taRightJustify
Caption = '起始包号'
end
object Label15: TLabel
Left = 136
Top = 37
Width = 48
Height = 12
Alignment = taRightJustify
Caption = '终止包号'
end
object Label14: TLabel
Left = 270
Top = 37
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -