📄 ydfdbl.dfm
字号:
object Ffdbl: TFfdbl
Left = 191
Top = 162
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = '分电比例输入'
ClientHeight = 218
ClientWidth = 311
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 7
Top = 8
Width = 297
Height = 169
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 19
Top = 12
Width = 52
Height = 13
Caption = '卡片编号'
end
object Label2: TLabel
Left = 19
Top = 36
Width = 52
Height = 13
Caption = '用电类别'
end
object Label3: TLabel
Left = 59
Top = 64
Width = 52
Height = 13
Caption = '计算方法'
end
object Label4: TLabel
Left = 187
Top = 64
Width = 59
Height = 13
Caption = '定量/定比'
end
object Label5: TLabel
Left = 27
Top = 111
Width = 13
Height = 13
Caption = '峰'
end
object Label6: TLabel
Left = 27
Top = 86
Width = 13
Height = 13
Caption = '平'
end
object Label7: TLabel
Left = 27
Top = 136
Width = 13
Height = 13
Caption = '谷'
end
object DBEdit1: TDBEdit
Left = 83
Top = 8
Width = 65
Height = 21
DataField = 'kh'
DataSource = YDData.DSdjkp
TabOrder = 0
end
object DBComboBox1: TDBComboBox
Left = 83
Top = 32
Width = 193
Height = 21
DataField = 'lb'
DataSource = YDData.DSdjkp
ItemHeight = 13
TabOrder = 1
end
object DBComboBox2: TDBComboBox
Left = 47
Top = 107
Width = 112
Height = 21
DataField = 'jsfsf'
DataSource = YDData.DSdjkp
Enabled = False
ItemHeight = 13
Items.Strings = (
'收容'
'定比'
'定量'
''
'')
TabOrder = 2
end
object DBEdit2: TDBEdit
Left = 171
Top = 107
Width = 105
Height = 21
DataField = 'gfbl'
DataSource = YDData.DSdjkp
Enabled = False
TabOrder = 3
end
object DBComboBox3: TDBComboBox
Left = 47
Top = 82
Width = 112
Height = 21
DataField = 'jsfsp'
DataSource = YDData.DSdjkp
ItemHeight = 13
Items.Strings = (
'收容'
'定比'
'定量'
'居民优待'
'职工优待'
'转变基数'
'跨越时段'
'不计变损')
TabOrder = 4
end
object DBEdit3: TDBEdit
Left = 171
Top = 82
Width = 105
Height = 21
DataField = 'pdbl'
DataSource = YDData.DSdjkp
TabOrder = 5
end
object DBComboBox4: TDBComboBox
Left = 47
Top = 132
Width = 112
Height = 21
DataField = 'jsfsg'
DataSource = YDData.DSdjkp
Enabled = False
ItemHeight = 13
Items.Strings = (
'收容'
'定比'
'定量'
'')
TabOrder = 6
end
object DBEdit4: TDBEdit
Left = 171
Top = 132
Width = 105
Height = 21
DataField = 'dgbl'
DataSource = YDData.DSdjkp
Enabled = False
TabOrder = 7
end
end
object BitBtn1: TBitBtn
Left = 40
Top = 184
Width = 73
Height = 25
Caption = '确定'
TabOrder = 1
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 120
Top = 184
Width = 73
Height = 25
Caption = '帮助'
TabOrder = 2
Kind = bkHelp
end
object BitBtn3: TBitBtn
Left = 200
Top = 184
Width = 73
Height = 25
Caption = '取消'
TabOrder = 3
OnClick = BitBtn3Click
Kind = bkCancel
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -