📄 hm_user.~dfm
字号:
object hm_userForm: Thm_userForm
Left = 219
Top = 155
Width = 657
Height = 517
Caption = #29992#25143#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object SpeedButton1: TSpeedButton
Left = 528
Top = 72
Width = 81
Height = 33
Caption = #20462#25913
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 528
Top = 136
Width = 81
Height = 33
Caption = #28155#21152
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 528
Top = 200
Width = 81
Height = 33
Caption = #21024#38500
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 528
Top = 304
Width = 81
Height = 33
Caption = #30830#23450
Visible = False
OnClick = SpeedButton4Click
end
object SpeedButton5: TSpeedButton
Left = 528
Top = 368
Width = 81
Height = 33
Caption = #21462#28040
Visible = False
OnClick = SpeedButton5Click
end
object Label4: TLabel
Left = 40
Top = 21
Width = 54
Height = 12
Caption = #20851#38190#23383' '
end
object SpeedButton6: TSpeedButton
Left = 416
Top = 16
Width = 65
Height = 33
Caption = #21551#21160#26597#35810
OnClick = SpeedButton6Click
end
object DBGrid1: TDBGrid
Left = 40
Top = 72
Width = 441
Height = 169
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = #32534#21495
Width = 81
Visible = True
end
item
Expanded = False
FieldName = #29992#25143#21517
Width = 78
Visible = True
end>
end
object GroupBox1: TGroupBox
Left = 40
Top = 248
Width = 441
Height = 209
Caption = #35814#32454#20449#24687
TabOrder = 1
object Label1: TLabel
Left = 48
Top = 104
Width = 48
Height = 12
Caption = #29992#25143#21517' '
end
object Label2: TLabel
Left = 240
Top = 56
Width = 42
Height = 12
Caption = #23494#30721' '
end
object Label3: TLabel
Left = 48
Top = 56
Width = 48
Height = 12
Caption = #30495#23454#21517' '
end
object Label5: TLabel
Left = 240
Top = 104
Width = 54
Height = 12
Caption = #21592#24037#21495' '
end
object Label6: TLabel
Left = 48
Top = 152
Width = 24
Height = 12
Caption = #26435#38480
end
object Edit1: TEdit
Left = 104
Top = 99
Width = 97
Height = 20
TabOrder = 0
end
object Edit2: TEdit
Left = 296
Top = 51
Width = 105
Height = 20
PasswordChar = '*'
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 104
Top = 152
Width = 145
Height = 20
ItemHeight = 12
TabOrder = 2
Items.Strings = (
#26222#36890
#39640#32423
#31649#29702#21592)
end
object Edit4: TEdit
Left = 296
Top = 96
Width = 105
Height = 20
TabOrder = 3
end
end
object ComboBox2: TComboBox
Left = 88
Top = 16
Width = 129
Height = 20
ItemHeight = 12
TabOrder = 2
OnClick = ComboBox2Click
Items.Strings = (
#20840#37096
#26222#36890#31561#32423
#39640#32423#31561#32423
#31649#29702#21592
#29992#25143#21517)
end
object Edit3: TEdit
Left = 144
Top = 296
Width = 97
Height = 20
TabOrder = 3
end
object Edit5: TEdit
Left = 238
Top = 16
Width = 147
Height = 20
TabOrder = 4
Visible = False
end
object ADOQuery1: TADOQuery
Connection = hm_mainForm.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#37096#38376#20449#24687
'order by '#32534#21495' asc')
Left = 552
Top = 16
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 512
Top = 16
end
object ADOQuery2: TADOQuery
Connection = hm_mainForm.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#37096#38376#20449#24687
'order by '#32534#21495' asc')
Left = 592
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -