📄 sy_ndfpjhcx.dfm
字号:
object FrmY_NDFPJHCX: TFrmY_NDFPJHCX
Tag = 41400
Left = 11
Top = 0
Width = 700
Height = 500
BorderIcons = [biSystemMenu]
Caption = '邮资票品管理信息系统——集邮品业务'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
ShowHint = True
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 692
Height = 40
Align = alTop
BevelOuter = bvLowered
TabOrder = 0
object XttxTitle: TRxLabel
Left = 1
Top = 1
Width = 690
Height = 24
Align = alTop
Alignment = taCenter
Caption = '年度分配计划查询'
Font.Charset = GB2312_CHARSET
Font.Color = clGreen
Font.Height = -24
Font.Name = '楷体_GB2312'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Ldwmc: TLabel
Left = 20
Top = 20
Width = 60
Height = 12
Caption = '使用单位:'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 583
Top = 19
Width = 36
Height = 12
Caption = '年度:'
end
object ND: TSpinEdit
Left = 624
Top = 14
Width = 54
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 4
MaxValue = 9999
MinValue = 0
ParentFont = False
TabOrder = 0
Value = 9999
OnChange = NDChange
end
end
object Panel2: TPanel
Left = 0
Top = 40
Width = 692
Height = 396
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel5: TPanel
Left = 0
Top = 0
Width = 692
Height = 396
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object Panel4: TPanel
Left = 1
Top = 365
Width = 690
Height = 30
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object Label2: TLabel
Left = 37
Top = 8
Width = 48
Height = 12
Caption = '批注人:'
Transparent = True
Visible = False
end
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 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 = 0
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 = 1
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 = 2
end
end
object Panel7: TPanel
Left = 1
Top = 1
Width = 690
Height = 41
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 10
Top = 17
Width = 48
Height = 12
Caption = '计划号:'
end
object Label4: TLabel
Left = 205
Top = 16
Width = 60
Height = 12
Caption = '票品名称:'
end
object CB_JHH: TComboBox
Left = 60
Top = 13
Width = 133
Height = 20
ItemHeight = 12
TabOrder = 0
OnChange = CB_JHHChange
end
object RG_ZT: TRadioGroup
Left = 505
Top = 5
Width = 167
Height = 30
Caption = '状态情况'
Columns = 2
ItemIndex = 0
Items.Strings = (
'未分配 '
'已分配')
TabOrder = 1
Visible = False
end
object DBEdit3: TDBEdit
Left = 266
Top = 12
Width = 230
Height = 20
Color = clSilver
DataField = 'YPMC'
DataSource = DataSource3
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
end
end
object DBGrid2: TDBGrid
Left = 1
Top = 42
Width = 690
Height = 323
Align = alClient
Color = clSilver
DataSource = DataSource3
PopupMenu = data.pm_Export
TabOrder = 2
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnTitleClick = DBG_JJNFPJHTitleClick
Columns = <
item
Expanded = False
FieldName = 'DWMC'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = '单位名称'
Width = 198
Visible = True
end
item
Expanded = False
FieldName = 'JHFPZS'
Title.Alignment = taCenter
Title.Caption = '计划分配总套数'
Width = 145
Visible = True
end
item
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -