📄 ydbzyw.dfm
字号:
Font.Name = '宋体'
Font.Style = []
MaxLength = 5
ParentFont = False
TabOrder = 11
end
object DBEdit6: TDBEdit
Left = 436
Top = 157
Width = 82
Height = 21
DataField = 'sq_rq'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 12
end
object DBEdit4: TDBEdit
Left = 465
Top = 12
Width = 55
Height = 21
DataField = 'sq_fl'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 13
end
end
end
object TabSheet2: TTabSheet
Caption = '供电方案'
ImageIndex = 1
object Panel4: TPanel
Left = 0
Top = -1
Width = 536
Height = 245
BevelInner = bvLowered
BevelOuter = bvLowered
Enabled = False
TabOrder = 0
object SpeedButton5: TSpeedButton
Left = 440
Top = 214
Width = 73
Height = 25
Caption = '确定(&Y)'
OnClick = SpeedButton5Click
end
object Shape24: TShape
Left = 10
Top = 203
Width = 513
Height = 1
Brush.Style = bsClear
end
object Shape25: TShape
Left = 10
Top = 204
Width = 513
Height = 1
Brush.Style = bsClear
Pen.Color = clWhite
end
object Label30: TLabel
Left = 14
Top = 16
Width = 52
Height = 13
Caption = '核准照明'
end
object Label31: TLabel
Left = 163
Top = 16
Width = 52
Height = 13
Caption = '核准动力'
end
object Label33: TLabel
Left = 14
Top = 42
Width = 52
Height = 13
Caption = '收费方式'
end
object Label34: TLabel
Left = 163
Top = 42
Width = 52
Height = 13
Caption = '计量方式'
end
object Label35: TLabel
Left = 313
Top = 16
Width = 52
Height = 13
Caption = '供电电压'
end
object Label36: TLabel
Left = 14
Top = 68
Width = 52
Height = 13
Caption = '力率标准'
end
object Label37: TLabel
Left = 163
Top = 68
Width = 52
Height = 13
Caption = '单一两部'
end
object Label38: TLabel
Left = 313
Top = 42
Width = 52
Height = 13
Caption = '变损处理'
end
object Label39: TLabel
Left = 14
Top = 94
Width = 52
Height = 13
Caption = '执行电价'
end
object Label40: TLabel
Left = 27
Top = 177
Width = 39
Height = 13
Caption = '制定人'
end
object Label41: TLabel
Left = 150
Top = 177
Width = 39
Height = 13
Caption = '审批人'
end
object Label42: TLabel
Left = 282
Top = 177
Width = 52
Height = 13
Caption = '审批日期'
end
object Label43: TLabel
Left = 163
Top = 121
Width = 52
Height = 13
Caption = '产权分界'
end
object Label44: TLabel
Left = 14
Top = 120
Width = 52
Height = 13
Caption = '是否专线'
end
object Label45: TLabel
Left = 313
Top = 96
Width = 52
Height = 13
Caption = '抄表日期'
end
object Label46: TLabel
Left = 163
Top = 94
Width = 52
Height = 13
Caption = '负荷等级'
end
object Label47: TLabel
Left = 27
Top = 147
Width = 39
Height = 13
Caption = '计量点'
end
object Label48: TLabel
Left = 224
Top = 149
Width = 52
Height = 13
Caption = '进线保护'
end
object Label93: TLabel
Left = 312
Top = 70
Width = 52
Height = 13
Caption = '交费日期'
end
object DBEdit18: TDBEdit
Left = 72
Top = 13
Width = 76
Height = 21
DataField = 'YD_HZZM'
DataSource = YDData.DSbzyhda
TabOrder = 0
end
object DBEdit19: TDBEdit
Left = 222
Top = 13
Width = 76
Height = 21
DataField = 'YD_HZDL'
DataSource = YDData.DSbzyhda
TabOrder = 1
end
object DBComboBox3: TDBComboBox
Left = 72
Top = 39
Width = 76
Height = 21
DataField = 'YD_SFFS'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'现收'
'托收'
'储蓄')
TabOrder = 2
end
object DBComboBox4: TDBComboBox
Left = 222
Top = 39
Width = 76
Height = 21
DataField = 'YD_GDFS'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'低供低计'
'高供高计'
'高供低计')
TabOrder = 3
end
object DBComboBox5: TDBComboBox
Left = 369
Top = 13
Width = 76
Height = 21
DataField = 'YD_GDDY'
DataSource = YDData.DSbzyhda
ItemHeight = 13
TabOrder = 4
end
object DBComboBox6: TDBComboBox
Left = 72
Top = 65
Width = 76
Height = 21
DataField = 'YD_LLBZ'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'0.00'
'0.80'
'0.85'
'0.90')
TabOrder = 5
end
object DBComboBox7: TDBComboBox
Left = 222
Top = 65
Width = 76
Height = 21
DataField = 'YD_DYLB'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'单一制'
'两部制')
TabOrder = 6
end
object DBComboBox8: TDBComboBox
Left = 369
Top = 39
Width = 76
Height = 21
DataField = 'YD_BSCL'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'不计变损'
'加计变损')
TabOrder = 7
end
object DBComboBox9: TDBComboBox
Left = 72
Top = 91
Width = 76
Height = 21
DataField = 'YD_XZDJ'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'照明'
'菲普工业'
'大宗工业'
'趸受'
'农业')
TabOrder = 8
end
object DBEdit20: TDBEdit
Left = 72
Top = 173
Width = 65
Height = 21
Color = clInfoBk
DataField = 'YD_FZDR'
DataSource = YDData.DSbzyhda
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 9
OnDblClick = DBEdit20DblClick
end
object DBEdit21: TDBEdit
Left = 197
Top = 173
Width = 68
Height = 21
Color = clInfoBk
DataField = 'YD_FSPR'
DataSource = YDData.DSbzyhda
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 10
OnDblClick = DBEdit21DblClick
end
object DBEdit22: TDBEdit
Left = 338
Top = 173
Width = 98
Height = 21
Color = clInfoBk
DataField = 'YD_FSPRQ'
DataSource = YDData.DSbzyhda
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 11
OnDblClick = DBEdit22DblClick
end
object DBEdit23: TDBEdit
Left = 72
Top = 144
Width = 135
Height = 21
DataField = 'YD_JLD'
DataSource = YDData.DSbzyhda
TabOrder = 12
end
object DBComboBox10: TDBComboBox
Left = 223
Top = 118
Width = 218
Height = 21
DataField = 'YD_CQFJ'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'最后一个支持物'
'下桩头20厘米处')
TabOrder = 13
end
object DBComboBox11: TDBComboBox
Left = 72
Top = 118
Width = 76
Height = 21
DataField = 'YD_SFZX'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'非专线'
'专线')
TabOrder = 14
end
object DBEdit24: TDBEdit
Left = 372
Top = 91
Width = 39
Height = 21
DataField = 'YD_CBRQ'
DataSource = YDData.DSbzyhda
TabOrder = 15
end
object DBEdit25: TDBEdit
Left = 284
Top = 145
Width = 154
Height = 21
DataField = 'YD_JXBH'
DataSource = YDData.DSbzyhda
TabOrder = 16
end
object DBComboBox12: TDBComboBox
Left = 224
Top = 91
Width = 65
Height = 21
DataField = 'YD_FHDJ'
DataSource = YDData.DSbzyhda
ItemHeight = 13
Items.Strings = (
'一级'
'二级'
'三级'
'四级')
TabOrder = 17
end
object DBEdit57: TDBEdit
Left = 371
Top = 65
Width = 39
Height = 21
DataField = 'YD_JFRQ'
DataSource = YDData.DSbzyhda
TabOrder = 18
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -