📄 user.dfm
字号:
end
object edPassword: TEdit
Left = 299
Top = 51
Width = 145
Height = 21
PasswordChar = '@'
TabOrder = 4
end
end
object btnNew: TBitBtn
Left = 466
Top = 12
Width = 89
Height = 30
Caption = #26032#22686
TabOrder = 1
OnClick = btnNewClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object btnModify: TBitBtn
Left = 466
Top = 45
Width = 89
Height = 30
Caption = #20462#25913
TabOrder = 2
OnClick = btnModifyClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
NumGlyphs = 2
end
object btnDelete: TBitBtn
Left = 466
Top = 78
Width = 89
Height = 30
Caption = #21034#38500
TabOrder = 3
OnClick = btnDeleteClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object btnSave: TBitBtn
Left = 467
Top = 111
Width = 89
Height = 30
Caption = #20445#23384
TabOrder = 4
OnClick = btnSaveClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
7700333333337777777733333333008088003333333377F73377333333330088
88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
end
object btnCancel: TBitBtn
Left = 467
Top = 145
Width = 89
Height = 30
Caption = #21462#28040
TabOrder = 5
OnClick = btnCancelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333333FFF33FF333FFF339993370733
999333777FF37FF377733339993000399933333777F777F77733333399970799
93333333777F7377733333333999399933333333377737773333333333990993
3333333333737F73333333333331013333333333333777FF3333333333910193
333333333337773FF3333333399000993333333337377737FF33333399900099
93333333773777377FF333399930003999333337773777F777FF339993370733
9993337773337333777333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object GroupBox2: TGroupBox
Left = 8
Top = 8
Width = 457
Height = 169
Caption = #24050#26377#29992#29992#25142
TabOrder = 6
object wwDBGrid1: TwwDBGrid
Left = 2
Top = 15
Width = 453
Height = 152
DisableThemesInTitle = False
ControlType.Strings = (
'lEnable;CheckBox;true;false')
Selected.Strings = (
'cUserid'#9'10'#9#29992#25142#20195#30908#9'F'
'cUserName'#9'14'#9#29992#25142#22995#21517#9'F'
'cRightGroup'#9'12'#9#36523#20221#9'F'
'lEnable'#9'8'#9#26159#21542#28608#27963#9#9
'cDepartment'#9'20'#9#37096#38272#9'F')
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
Align = alClient
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
TitleAlignment = taCenter
TitleFont.Charset = CHINESEBIG5_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #26032#32048#26126#39636
TitleFont.Style = []
TitleLines = 1
TitleButtons = False
UseTFields = False
PaintOptions.AlternatingRowColor = clInfoBk
end
end
end
end
object TabSheet2: TTabSheet
Caption = #29992#25142#27402#38480#35373#23450
ImageIndex = 1
object Panel2: TPanel
Left = 0
Top = 0
Width = 563
Height = 301
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object wwDBGrid3: TwwDBGrid
Left = 8
Top = 40
Width = 158
Height = 257
DisableThemesInTitle = False
ControlType.Strings = (
'lNew;CheckBox;true;false'
'lModify;CheckBox;true;false'
'lDelete;CheckBox;true;false'
'lBrowse;CheckBox;true;false')
Selected.Strings = (
'cFuncName'#9'20'#9#26410#25480#27402#21151#33021#9'F')
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
DataSource = DataSource3
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgWordWrap]
TabOrder = 0
TitleAlignment = taCenter
TitleFont.Charset = CHINESEBIG5_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #26032#32048#26126#39636
TitleFont.Style = []
TitleLines = 1
TitleButtons = False
UseTFields = False
end
object wwDBGrid2: TwwDBGrid
Left = 250
Top = 40
Width = 305
Height = 257
DisableThemesInTitle = False
ControlType.Strings = (
'lNew;CheckBox;true;false'
'lModify;CheckBox;true;false'
'lDelete;CheckBox;true;false'
'lBrowse;CheckBox;true;false'
'InfoBrow;CheckBox;true;false'
'InfoAdd;CheckBox;true;false'
'InfoModify;CheckBox;true;false'
'InfoDelete;CheckBox;true;false'
'lInfoBrow;CheckBox;true;false'
'lInfoModify;CheckBox;true;false'
'lInfoDelete;CheckBox;true;false'
'lInfoAdd;CheckBox;true;false')
Selected.Strings = (
'FuncName'#9'20'#9#25480#27402#21151#33021#38917#9'F'
'lInfoBrow'#9'5'#9#27969#35261#9'F'
'lInfoModify'#9'5'#9#20462#25913#9'F'
'lInfoDelete'#9'5'#9#21034#38500#9'F'
'lInfoAdd'#9'5'#9#26032#22686#9'F')
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
DataSource = DataSource4
Options = [dgEditing, dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
TabOrder = 1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -