📄 cusfile.dfm
字号:
inherited CusFileForm: TCusFileForm
Left = 280
Top = 249
ActiveControl = edtClient
Caption = #20445#20462#36164#26009
ClientHeight = 190
ClientWidth = 451
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
inherited code: TLabel
Top = 14
Width = 48
Caption = #23458' '#25143
end
object Label1: TLabel [1]
Left = 9
Top = 74
Width = 48
Height = 12
Caption = #36710#29260#21495#30721
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel [2]
Left = 175
Top = 14
Width = 48
Height = 12
Caption = #20445#20462#21345#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel [3]
Left = 9
Top = 44
Width = 48
Height = 12
Caption = #36141#20080#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel [4]
Left = 175
Top = 44
Width = 48
Height = 12
Caption = #21457' '#21160' '#26426
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel [5]
Left = 175
Top = 74
Width = 48
Height = 12
Caption = #21806' '#20215
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
inherited BtnPrior: TBitBtn
Left = 338
Top = 15
TabOrder = 6
OnClick = BtnPriorClick
end
inherited BtnNext: TBitBtn
Left = 338
Top = 48
TabOrder = 7
OnClick = BtnNextClick
end
inherited BtnSave: TBitBtn
Left = 338
Top = 81
TabOrder = 8
end
inherited Btnexit: TBitBtn
Left = 338
Top = 114
TabOrder = 9
end
inherited Btnadd: TBitBtn
Left = 338
Top = 147
TabOrder = 10
OnClick = BtnaddClick
end
inherited chkStopUsed: TCheckBox
Left = 338
Top = 183
TabOrder = 11
Visible = False
end
inherited DEno: TDBEdit
Left = 227
Top = 152
Width = 100
TabOrder = 12
Visible = False
end
object edtClient: TDBEditEh
Left = 61
Top = 10
Width = 100
Height = 20
EditButtons = <
item
OnClick = edtClientEditButtons0Click
end>
TabOrder = 0
Visible = True
end
object edtBuyDate: TDBDateTimeEditEh
Left = 61
Top = 40
Width = 100
Height = 20
EditButtons = <>
Kind = dtkDateEh
TabOrder = 1
Visible = True
end
object edtCheckNo: TDBEditEh
Left = 227
Top = 10
Width = 100
Height = 20
EditButtons = <>
TabOrder = 3
Visible = True
end
object edtMotorLabel: TDBEditEh
Left = 61
Top = 70
Width = 100
Height = 20
EditButtons = <>
TabOrder = 2
Visible = True
end
object edtSalePrice: TDBEditEh
Left = 227
Top = 70
Width = 100
Height = 20
EditButtons = <>
TabOrder = 5
Text = '0'
Visible = True
end
object edtMachineID: TDBEditEh
Left = 227
Top = 40
Width = 100
Height = 20
EditButtons = <>
TabOrder = 4
Visible = True
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -