📄 mc_ssfydj.~dfm
字号:
object SSFYDJ: TSSFYDJ
Left = 0
Top = 0
BorderStyle = bsToolWindow
Caption = '实收费用登记：'
ClientHeight = 546
ClientWidth = 792
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
ShowHint = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 4
Top = 3
Width = 141
Height = 48
Caption = '小区名：'
TabOrder = 0
object DBLookupComboBox1: TDBLookupComboBox
Left = 9
Top = 18
Width = 120
Height = 20
KeyField = '小区名'
ListField = '小区名'
ListSource = DataSource1
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 4
Top = 56
Width = 141
Height = 203
Caption = '大楼名称：'
TabOrder = 1
object DBGrid1: TDBGrid
Left = 8
Top = 17
Width = 124
Height = 176
DataSource = DataSource2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = '大楼名称'
Width = 89
Visible = True
end>
end
end
object GroupBox3: TGroupBox
Left = 4
Top = 263
Width = 141
Height = 280
Caption = '房屋列表：'
TabOrder = 2
object DBGrid2: TDBGrid
Left = 8
Top = 16
Width = 123
Height = 254
DataSource = DataSource3
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = '房间号码'
Title.Caption = '房间号'
Width = 38
Visible = True
end
item
Expanded = False
FieldName = '房主姓名'
Title.Caption = '房主'
Width = 49
Visible = True
end>
end
end
object GroupBox4: TGroupBox
Left = 151
Top = 3
Width = 637
Height = 319
Caption = '水电煤气费信息：'
Enabled = False
TabOrder = 3
object Label1: TLabel
Left = 16
Top = 26
Width = 60
Height = 12
Caption = '水表编号：'
end
object Label2: TLabel
Left = 16
Top = 50
Width = 60
Height = 12
Caption = '户主姓名：'
end
object Label3: TLabel
Left = 16
Top = 74
Width = 60
Height = 12
Caption = '收费标准：'
end
object Label4: TLabel
Left = 16
Top = 97
Width = 60
Height = 12
Caption = '收费金额：'
end
object Label5: TLabel
Left = 16
Top = 122
Width = 84
Height = 12
Caption = '计费起始日期：'
end
object Label6: TLabel
Left = 16
Top = 146
Width = 84
Height = 12
Caption = '计费终止日期：'
end
object Label7: TLabel
Left = 16
Top = 170
Width = 60
Height = 12
Caption = '本月读数：'
end
object Label8: TLabel
Left = 16
Top = 194
Width = 60
Height = 12
Caption = '上月读数：'
end
object Label9: TLabel
Left = 16
Top = 218
Width = 48
Height = 12
Caption = '使用数：'
end
object Label10: TLabel
Left = 16
Top = 242
Width = 60
Height = 12
Caption = '应收金额：'
end
object Label11: TLabel
Left = 16
Top = 266
Width = 60
Height = 12
Caption = '实收金额：'
FocusControl = DBEdit11
end
object Label12: TLabel
Left = 16
Top = 290
Width = 60
Height = 12
Caption = '剩余金额：'
FocusControl = DBEdit12
end
object DBText1: TDBText
Left = 98
Top = 24
Width = 65
Height = 17
DataField = '水表编号'
DataSource = DataSource4
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText2: TDBText
Left = 98
Top = 48
Width = 65
Height = 17
DataField = '户主姓名'
DataSource = DataSource4
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText3: TDBText
Left = 98
Top = 72
Width = 65
Height = 17
DataField = '收费标准'
DataSource = DataSource4
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText4: TDBText
Left = 98
Top = 192
Width = 65
Height = 17
DataField = '上月读数'
DataSource = DataSource4
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText5: TDBText
Left = 98
Top = 216
Width = 65
Height = 17
DataField = '使用数'
DataSource = DataSource4
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 216
Top = 7
Width = 4
Height = 310
Shape = bsLeftLine
end
object Bevel2: TBevel
Left = 428
Top = 7
Width = 4
Height = 310
Shape = bsLeftLine
end
object Label13: TLabel
Left = 223
Top = 26
Width = 60
Height = 12
Caption = '电表编号：'
end
object Label14: TLabel
Left = 223
Top = 50
Width = 60
Height = 12
Caption = '户主姓名：'
end
object Label15: TLabel
Left = 223
Top = 74
Width = 60
Height = 12
Caption = '收费标准：'
end
object Label16: TLabel
Left = 223
Top = 97
Width = 60
Height = 12
Caption = '收费金额：'
end
object Label17: TLabel
Left = 223
Top = 122
Width = 84
Height = 12
Caption = '计费起始日期：'
end
object Label18: TLabel
Left = 223
Top = 146
Width = 84
Height = 12
Caption = '计费终止日期：'
end
object Label19: TLabel
Left = 223
Top = 170
Width = 60
Height = 12
Caption = '本月读数：'
end
object Label20: TLabel
Left = 223
Top = 194
Width = 60
Height = 12
Caption = '上月读数：'
end
object Label21: TLabel
Left = 223
Top = 218
Width = 48
Height = 12
Caption = '使用数：'
end
object Label22: TLabel
Left = 223
Top = 242
Width = 60
Height = 12
Caption = '应收金额：'
end
object Label23: TLabel
Left = 223
Top = 266
Width = 60
Height = 12
Caption = '实收金额：'
FocusControl = DBEdit18
end
object Label24: TLabel
Left = 223
Top = 290
Width = 60
Height = 12
Caption = '剩余金额：'
FocusControl = DBEdit19
end
object DBText6: TDBText
Left = 313
Top = 24
Width = 65
Height = 17
DataField = '电表编号'
DataSource = DataSource5
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText7: TDBText
Left = 313
Top = 48
Width = 65
Height = 17
DataField = '户主姓名'
DataSource = DataSource5
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText8: TDBText
Left = 313
Top = 72
Width = 65
Height = 17
DataField = '收费标准'
DataSource = DataSource5
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText9: TDBText
Left = 313
Top = 194
Width = 65
Height = 17
DataField = '上月读数'
DataSource = DataSource5
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBText10: TDBText
Left = 313
Top = 216
Width = 65
Height = 17
DataField = '使用数'
DataSource = DataSource5
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 440
Top = 26
Width = 72
Height = 12
Caption = '煤气表编号：'
end
object Label26: TLabel
Left = 440
Top = 50
Width = 60
Height = 12
Caption = '户主姓名：'
end
object Label27: TLabel
Left = 440
Top = 74
Width = 60
Height = 12
Caption = '收费标准：'
end
object Label28: TLabel
Left = 440
Top = 97
Width = 60
Height = 12
Caption = '收费金额：'
end
object DBText11: TDBText
Left = 521
Top = 24
Width = 65
Height = 17
DataField = '煤气表编号'
DataSource = DataSource6
Font.Charset = GB2312_CHARSET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -