📄 ydbsjl.dfm
字号:
FFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0BB00F
FFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B00FFFFFF0BB000BB0
0FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFF}
Layout = blGlyphTop
ParentFont = False
end
object SpeedButton10: TSpeedButton
Left = 402
Top = 2
Width = 44
Height = 38
Caption = '退出'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
Layout = blGlyphTop
ParentFont = False
OnClick = SpeedButton10Click
end
end
object Panel1: TPanel
Left = 0
Top = 48
Width = 456
Height = 106
BevelInner = bvLowered
BevelOuter = bvNone
Enabled = False
TabOrder = 1
object Label1: TLabel
Left = 38
Top = 14
Width = 26
Height = 13
Caption = '表组'
end
object Label2: TLabel
Left = 164
Top = 14
Width = 39
Height = 13
Caption = '总分码'
end
object Label8: TLabel
Left = 12
Top = 81
Width = 52
Height = 13
Caption = '计损设备'
end
object Label9: TLabel
Left = 202
Top = 81
Width = 52
Height = 13
Caption = '产权单位'
end
object Label3: TLabel
Left = 302
Top = 13
Width = 52
Height = 13
Caption = '电表类别'
end
object Label4: TLabel
Left = 13
Top = 42
Width = 52
Height = 13
Caption = '抄表标记'
end
object Label5: TLabel
Left = 180
Top = 42
Width = 26
Height = 13
Caption = '时段'
end
object Shape1: TShape
Left = 3
Top = 66
Width = 446
Height = 1
end
object Shape2: TShape
Left = 3
Top = 67
Width = 446
Height = 1
Pen.Color = clNone
end
object DBCheckBox1: TDBCheckBox
Left = 300
Top = 36
Width = 81
Height = 17
Alignment = taLeftJustify
Caption = '子表分摊'
DataField = 'BS_SFFT'
DataSource = YDData.DSbsjl
TabOrder = 0
ValueChecked = '分摊'
ValueUnchecked = '不分摊'
end
object DBEdit7: TDBEdit
Left = 79
Top = 76
Width = 89
Height = 21
Hint = '双击选择计损设备'
Color = clInfoBk
DataField = 'BS_BSBH'
DataSource = YDData.DSbsjl
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnDblClick = DBEdit7DblClick
end
object DBEdit4: TDBEdit
Left = 263
Top = 77
Width = 176
Height = 21
DataField = 'BS_CQDW'
DataSource = YDData.DSbsjl
TabOrder = 2
end
object DBEdit2: TDBEdit
Left = 214
Top = 7
Width = 65
Height = 21
DataField = 'BS_ZFGX'
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 3
end
object DBEdit1: TDBEdit
Left = 79
Top = 8
Width = 36
Height = 21
DataField = 'BS_BZH'
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 4
end
object DBEdit3: TDBEdit
Left = 369
Top = 7
Width = 68
Height = 21
DataField = 'BS_DBLB'
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 5
end
object DBEdit5: TDBEdit
Left = 79
Top = 36
Width = 65
Height = 21
DataField = 'BS_CBBJ'
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 6
end
object DBEdit6: TDBEdit
Left = 215
Top = 36
Width = 64
Height = 21
DataField = 'BS_SD'
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 7
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 158
Width = 457
Height = 123
DataSource = YDData.DSbsjl
ReadOnly = True
TabOrder = 2
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'BS_SQH'
Title.Alignment = taCenter
Title.Caption = '申请号'
Visible = True
end
item
Expanded = False
FieldName = 'BS_HH'
Title.Alignment = taCenter
Title.Caption = '户号'
Visible = True
end
item
Expanded = False
FieldName = 'BS_BSBH'
Title.Alignment = taCenter
Title.Caption = '设备编号'
Width = 91
Visible = True
end
item
Expanded = False
FieldName = 'BS_BZH'
Title.Alignment = taCenter
Title.Caption = '表组号'
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'BS_ZFGX'
Title.Alignment = taCenter
Title.Caption = '总分号'
Width = 74
Visible = True
end
item
Expanded = False
FieldName = 'BS_SFFT'
Title.Alignment = taCenter
Title.Caption = '子表分摊'
Width = 68
Visible = True
end>
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -