📄 lbwh.dfm
字号:
object LbwhForm: TLbwhForm
Left = 131
Top = 105
BorderStyle = bsSingle
Caption = #32500#25252#20132#26131#31867#21035
ClientHeight = 373
ClientWidth = 633
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 16
Top = 11
Width = 217
Height = 342
Caption = #32534#36753
TabOrder = 0
object Label1: TLabel
Left = 24
Top = 81
Width = 60
Height = 12
Caption = #20132#26131#20195#30721#65306
end
object Label2: TLabel
Left = 24
Top = 133
Width = 60
Height = 12
Caption = #20132#26131#21517#31216#65306
end
object Label3: TLabel
Left = 22
Top = 25
Width = 60
Height = 12
Caption = #20132#26131#31181#31867#65306
end
object btnNew: TButton
Left = 24
Top = 202
Width = 175
Height = 25
Caption = #26032#22686
TabOrder = 0
OnClick = btnNewClick
end
object btnDelete: TButton
Left = 26
Top = 266
Width = 175
Height = 25
Caption = #21024#38500
TabOrder = 1
OnClick = btnDeleteClick
end
object btnModify: TButton
Left = 24
Top = 234
Width = 175
Height = 25
Caption = #20462#25913
TabOrder = 2
OnClick = btnModifyClick
end
object btnExit: TButton
Left = 24
Top = 298
Width = 175
Height = 25
Caption = #36864#20986
TabOrder = 3
OnClick = btnExitClick
end
object cmb_sztype: TDBComboBoxEh
Left = 24
Top = 48
Width = 177
Height = 21
AlwaysShowBorder = True
Enabled = False
EditButtons = <>
Flat = True
Items.Strings = (
#25910#20837#20998#31867
#39135#21697#25903#20986
#29992#21697#25903#20986
#36153#29992#25903#20986
#20854#20182#25903#20986)
TabOrder = 4
Visible = True
OnChange = cmb_sztypeChange
end
object edt_szcode: TDBEditEh
Left = 24
Top = 96
Width = 175
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 6
TabOrder = 5
Visible = True
end
object edt_szname: TDBEditEh
Left = 24
Top = 152
Width = 175
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 20
TabOrder = 6
Visible = True
end
end
object GroupBox2: TGroupBox
Left = 246
Top = 11
Width = 372
Height = 342
Caption = #24050#23384#22312#30340#20132#26131#31867#21035
TabOrder = 1
object Bevel1: TBevel
Left = 1
Top = 292
Width = 370
Height = 2
Shape = bsTopLine
end
object Label4: TLabel
Left = 16
Top = 312
Width = 54
Height = 12
Caption = #25490#24207#26041#24335':'
end
object DBGridEh: TDBGridEh
Left = 14
Top = 24
Width = 344
Height = 253
AutoFitColWidths = True
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
RowHeight = 2
RowLines = 1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
TitleHeight = 15
Columns = <
item
Alignment = taCenter
EditButtons = <>
FieldName = 'szType'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #20132#26131#31181#31867
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'szCode'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #20132#26131#20195#30721
Width = 67
end
item
EditButtons = <>
FieldName = 'szName'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #20132#26131#21517#31216
Width = 111
end>
end
object RadioButton1: TRadioButton
Left = 80
Top = 310
Width = 80
Height = 17
Caption = #20132#26131#31181#31867
Checked = True
TabOrder = 1
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 166
Top = 310
Width = 80
Height = 17
Caption = #20132#26131#20195#30721
TabOrder = 2
OnClick = RadioButton2Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -