📄 unit5.~dfm
字号:
object Form5: TForm5
Left = 192
Top = 107
Width = 524
Height = 342
Caption = '用户管理'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 336
Top = 0
Width = 3
Height = 315
Cursor = crHSplit
Align = alNone
end
object Panel1: TPanel
Left = -8
Top = 0
Width = 345
Height = 313
TabOrder = 0
object Label1: TLabel
Left = 120
Top = 32
Width = 96
Height = 16
Caption = '用户信息浏览'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 64
Top = 256
Width = 200
Height = 32
Caption = '请注意:密码最少3位数,且请注意大小写是有区别的。'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ParentFont = False
WordWrap = True
end
object DBGrid1: TDBGrid
Left = 8
Top = 56
Width = 329
Height = 185
Color = clInfoBk
DataSource = DataSource1
FixedColor = clBackground
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
object Panel2: TPanel
Left = 344
Top = 0
Width = 169
Height = 313
TabOrder = 1
object Label3: TLabel
Left = 64
Top = 40
Width = 48
Height = 16
Caption = '操作区'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 72
Width = 52
Height = 13
Caption = '用户名:'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 104
Width = 47
Height = 13
Caption = '密 码:'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 64
Top = 72
Width = 81
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'Edit1'
end
object Edit2: TEdit
Left = 64
Top = 96
Width = 81
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'Edit2'
end
object BitBtn1: TBitBtn
Left = 48
Top = 160
Width = 75
Height = 25
Caption = '新增用户'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 48
Top = 200
Width = 75
Height = 25
Caption = '删 除'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333333FFF33FF333FFF339993370733
999333777FF37FF377733339993000399933333777F777F77733333399970799
93333333777F7377733333333999399933333333377737773333333333990993
3333333333737F73333333333331013333333333333777FF3333333333910193
333333333337773FF3333333399000993333333337377737FF33333399900099
93333333773777377FF333399930003999333337773777F777FF339993370733
9993337773337333777333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 48
Top = 240
Width = 75
Height = 25
Caption = '返 回'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333333333333333333333FF333333333333
3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
000033333373FF77777733333330003333333333333777333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
end
object DataSource1: TDataSource
DataSet = Query1
Left = 248
Top = 16
end
object Query1: TQuery
DatabaseName = 'E:\bysj'
RequestLive = True
SQL.Strings = (
'select 姓名,密码 from userpass')
Left = 288
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -