📄 sy_ndfpjhzd.dfm
字号:
Visible = True
end>
end
object Panel5: TPanel
Left = 1
Top = 129
Width = 690
Height = 28
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object Label2: TLabel
Left = 264
Top = 8
Width = 72
Height = 12
Caption = '剩余总套数：'
end
object Label1: TLabel
Left = 9
Top = 8
Width = 60
Height = 12
Caption = '票品名称：'
end
object E_SYZTS: TCurrencyEdit
Left = 341
Top = 4
Width = 111
Height = 20
AutoSize = False
Color = clSilver
DecimalPlaces = 0
DisplayFormat = '#,##'
ReadOnly = True
TabOrder = 0
ZeroEmpty = False
OnEnter = E_SYZTSEnter
end
object BBt_AddDW: TBitBtn
Left = 487
Top = 3
Width = 94
Height = 21
Action = Act_AddDW
Caption = '添加单位(&G)'
TabOrder = 1
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object BBt_DeleteDW: TBitBtn
Left = 584
Top = 3
Width = 91
Height = 21
Action = Act_DeleteDW
Caption = '删除单位(&K)'
TabOrder = 2
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object E_PPMC: TEdit
Left = 68
Top = 4
Width = 173
Height = 20
Anchors = [akTop, akRight]
AutoSize = False
Color = clSilver
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 3
OnEnter = E_SYZTSEnter
end
object E_JHH: TEdit
Left = 76
Top = 39
Width = 143
Height = 20
Anchors = [akTop, akRight]
AutoSize = False
Color = clSilver
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 4
Visible = False
OnEnter = E_SYZTSEnter
end
end
object DBG_JJNFPJH: TRxDBGrid
Left = 1
Top = 157
Width = 690
Height = 212
Align = alBottom
Color = clSilver
DataSource = DataSource3
PopupMenu = data.pm_Export
TabOrder = 2
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnCellClick = DBG_JJNFPJHCellClick
OnKeyDown = DBG_JJNFPJHKeyDown
OnTitleClick = DBG_JJNFPJHTitleClick
FixedCols = 2
Columns = <
item
Expanded = False
FieldName = 'DWMC'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '单位名称'
Width = 156
Visible = True
end
item
Expanded = False
FieldName = 'JHFPZTS'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '计划分配总套数'
Width = 105
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'YDTS'
Title.Alignment = taCenter
Title.Caption = '预订套数'
Width = 100
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'LSTS'
Title.Alignment = taCenter
Title.Caption = '零售套数'
Width = 95
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'NCTS'
Title.Alignment = taCenter
Title.Caption = '年册套数'
Width = 101
Visible = True
end
item
Color = clInfoBk
Expanded = False
FieldName = 'YPTS'
Title.Alignment = taCenter
Title.Caption = '开发邮品'
Width = 92
Visible = True
end>
end
object DBG_JJNXQB: TDBGrid
Left = 309
Top = 1
Width = 382
Height = 128
Align = alClient
Color = clSilver
DataSource = DataSource2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
PopupMenu = data.pm_Export
TabOrder = 3
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnTitleClick = DBG_JJNXQBTitleClick
Columns = <
item
Expanded = False
FieldName = 'DWMC'
Title.Alignment = taCenter
Title.Caption = '单位名称'
Width = 97
Visible = True
end
item
Expanded = False
FieldName = 'YDTS'
Title.Alignment = taCenter
Title.Caption = '预订套数'
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'LSTS'
Title.Alignment = taCenter
Title.Caption = '零售套数'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'NCTS'
Title.Alignment = taCenter
Title.Caption = '年册套数'
Width = 65
Visible = True
end
item
Expanded = False
FieldName = 'KFYPTS'
Title.Alignment = taCenter
Title.Caption = '开发邮品'
Width = 63
Visible = True
end>
end
object Panel4: TPanel
Left = 1
Top = 369
Width = 690
Height = 30
Align = alBottom
BevelOuter = bvNone
TabOrder = 4
object Label5: TLabel
Left = 244
Top = 8
Width = 48
Height = 12
Caption = '制表人：'
Transparent = True
end
object Label6: TLabel
Left = 445
Top = 8
Width = 60
Height = 12
Caption = '制单日期：'
Transparent = True
end
object Label4: TLabel
Left = 37
Top = 8
Width = 48
Height = 12
Caption = '批准人：'
Transparent = True
Visible = False
end
object DBEdit2: TDBEdit
Left = 295
Top = 5
Width = 107
Height = 20
Color = clSilver
DataField = 'ZBR'
DataSource = DataSource3
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
end
object DBEdit4: TDBEdit
Left = 512
Top = 5
Width = 141
Height = 20
Color = clSilver
DataField = 'ZDRQ'
DataSource = DataSource3
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
end
object DBEdit1: TDBEdit
Left = 87
Top = 5
Width = 107
Height = 20
Color = clSilver
DataField = 'PZR'
DataSource = DataSource3
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
Visible = False
end
end
end
object ALi_Edit: TActionList
Left = 616
Top = 234
object Act_AddDW: TAction
Caption = '添加单位(&G)'
Hint = '在年度计划请领表中添加一单位'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -