📄 sy_ckjhdzd1.dfm
字号:
Text = '零星出库'
OnChange = E_CKXZChange
end
object ND: TSpinEdit
Left = 342
Top = 27
Width = 47
Height = 21
Hint = '更改年度'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 4
MaxValue = 9999
MinValue = 0
ParentFont = False
TabOrder = 1
Value = 9999
OnChange = NDChange
end
object YF: TSpinEdit
Left = 429
Top = 27
Width = 36
Height = 21
Hint = '更改年度'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 2
MaxValue = 12
MinValue = 1
ParentFont = False
TabOrder = 2
Value = 1
OnChange = NDChange
end
object RG_FX: TRadioGroup
Left = 516
Top = 18
Width = 105
Height = 30
Columns = 2
ItemIndex = 1
Items.Strings = (
'凑包'
'凑版')
TabOrder = 3
OnClick = RG_FXClick
end
object RG_CB: TRadioGroup
Left = 628
Top = 18
Width = 146
Height = 30
Caption = '凑版'
Columns = 3
ItemIndex = 2
Items.Strings = (
'向上'
'向下'
'不凑')
TabOrder = 4
end
end
object Panel2: TPanel
Left = 0
Top = 50
Width = 792
Height = 478
Align = alClient
TabOrder = 2
object Panel8: TPanel
Left = 1
Top = 1
Width = 790
Height = 31
Align = alTop
BevelOuter = bvNone
BiDiMode = bdRightToLeftNoAlign
ParentBiDiMode = False
TabOrder = 0
object L_CKJHDH: TLabel
Left = 315
Top = 10
Width = 84
Height = 12
Hint = '红色表示已签批'
Caption = '出库计划单号:'
OnDblClick = L_CKJHDHDblClick
end
object L_DWPPMC: TLabel
Left = 7
Top = 10
Width = 60
Height = 12
Caption = '票品名称:'
end
object CB_CKJHDH: TComboBox
Left = 400
Top = 6
Width = 121
Height = 20
ItemHeight = 12
TabOrder = 0
OnChange = CB_CKJHDHChange
end
object BBt_AddDW: TBitBtn
Left = 577
Top = 5
Width = 95
Height = 21
Hint = '添加'
Caption = '添加票品(&G)'
Enabled = False
TabOrder = 1
OnClick = BBt_AddDWClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object BBt_DeleteDW: TBitBtn
Left = 680
Top = 5
Width = 95
Height = 21
Hint = '删除'
Caption = '删除票品(&K)'
Enabled = False
TabOrder = 2
OnClick = BBt_DeleteDWClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object CB_PPMC: TFieldComboBox
Left = 70
Top = 6
Width = 200
Height = 20
ItemHeight = 12
TabOrder = 3
OnChange = CB_PPMCChange
end
end
object DBG_Main: TRxDBGrid
Left = 1
Top = 32
Width = 790
Height = 413
Align = alClient
DataSource = DS_Main
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
PopupMenu = PM_Main
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnEnter = DBG_MainEnter
FixedCols = 5
Columns = <
item
Color = clNone
Expanded = False
FieldName = 'DWMC'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '单位名称'
Width = 120
Visible = True
end
item
Color = clNone
Expanded = False
FieldName = 'ZH'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '志号'
Width = 60
Visible = True
end
item
Color = clNone
Expanded = False
FieldName = 'PPMC'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '票品名称'
Width = 150
Visible = True
end
item
Expanded = False
FieldName = 'KFMC'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '库房名称'
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'MZ'
ReadOnly = True
Title.Caption = '面值(元)'
Width = 52
Visible = True
end
item
Color = clNone
Expanded = False
FieldName = 'JJ'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '进价(元)'
Width = 50
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'XJ'
ReadOnly = True
Title.Caption = '销价(元)'
Width = 52
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'ZK'
Title.Alignment = taCenter
Title.Caption = '折扣(%)'
Width = 44
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'JSJ'
Title.Alignment = taCenter
Title.Caption = '结算价(元)'
Width = 63
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'FPSL'
Title.Alignment = taCenter
Title.Caption = '分配数量'
Width = 72
Visible = True
end>
end
object Panel6: TPanel
Left = 1
Top = 445
Width = 790
Height = 32
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object Label5: TLabel
Left = 16
Top = 10
Width = 48
Height = 12
Caption = '制表人:'
Transparent = True
end
object Label8: TLabel
Left = 171
Top = 10
Width = 48
Height = 12
Caption = '批准人:'
Transparent = True
end
object Label6: TLabel
Left = 328
Top = 10
Width = 60
Height = 12
Caption = '制单日期:'
Transparent = True
end
object Label7: TLabel
Left = 504
Top = 10
Width = 48
Height = 12
Caption = '库存量:'
Transparent = True
end
object Label2: TLabel
Left = 652
Top = 10
Width = 12
Height = 12
Caption = '枚'
Transparent = True
end
object DBE_PZR: TDBEdit
Left = 218
Top = 6
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -