?? usermanager.dfm
字號:
object UserManagerForm: TUserManagerForm
Left = 231
Top = 131
Width = 551
Height = 417
BorderWidth = 5
Caption = 'User-Manager'
Color = clBtnFace
Constraints.MaxHeight = 800
Constraints.MaxWidth = 551
Constraints.MinHeight = 417
Constraints.MinWidth = 551
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 533
Height = 343
ActivePage = TabSheetAddUser
Align = alClient
Images = ImageList1
TabHeight = 22
TabIndex = 0
TabOrder = 0
OnChange = PageControl1Change
object TabSheetAddUser: TTabSheet
Caption = 'Add User'
object Label4: TLabel
Left = 16
Top = 40
Width = 51
Height = 13
Caption = '&Username:'
FocusControl = EditUser
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 88
Width = 49
Height = 13
Caption = '&Password:'
FocusControl = EditPassword
end
object Label6: TLabel
Left = 16
Top = 64
Width = 51
Height = 13
Caption = 'From &Host:'
FocusControl = EditHost
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 256
Top = 16
Width = 94
Height = 13
Caption = 'Allow a&ccess to:'
FocusControl = DBUserTree
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 16
Top = 128
Width = 60
Height = 13
Caption = 'Privileges:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 16
Top = 16
Width = 68
Height = 13
Caption = 'Credentials:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Bevel1: TBevel
Left = 16
Top = 120
Width = 209
Height = 9
Shape = bsTopLine
end
object Label1: TLabel
Left = 274
Top = 272
Width = 56
Height = 13
Caption = '&Description:'
Enabled = False
FocusControl = EditDescription
end
object DBUserTree: TTreeView
Left = 256
Top = 40
Width = 257
Height = 193
Indent = 19
ReadOnly = True
RowSelect = True
ShowLines = False
ShowRoot = False
TabOrder = 3
end
object EditUser: TEdit
Left = 96
Top = 40
Width = 129
Height = 21
TabOrder = 0
end
object EditPassword: TEdit
Left = 96
Top = 88
Width = 129
Height = 21
PasswordChar = '*'
TabOrder = 2
end
object EditHost: TEdit
Left = 96
Top = 64
Width = 129
Height = 21
TabOrder = 1
Text = '%'
end
object CheckListBoxPrivileges: TCheckListBox
Left = 96
Top = 152
Width = 129
Height = 113
ItemHeight = 13
Items.Strings = (
'Select'
'Insert'
'Update'
'Delete'
'Index'
'Alter'
'Create'
'Drop'
'References'
'Reload'
'Shutdown'
'Process'
'File')
TabOrder = 5
end
object CheckBoxAllPrivileges: TCheckBox
Left = 96
Top = 128
Width = 105
Height = 17
Caption = '&All Privileges'
TabOrder = 4
OnClick = CheckBoxAllPrivilegesClick
end
object CheckBoxWithGrant: TCheckBox
Left = 96
Top = 272
Width = 105
Height = 17
Caption = '&With Grant Option'
TabOrder = 6
end
object CheckBoxCreateAccount: TCheckBox
Left = 256
Top = 248
Width = 249
Height = 17
Caption = 'Create Connection-Account for &MySQL-Front'
TabOrder = 7
OnClick = CheckBoxCreateAccountClick
end
object EditDescription: TEdit
Left = 336
Top = 270
Width = 177
Height = 21
Enabled = False
TabOrder = 8
end
end
object TabSheetEditUsers: TTabSheet
Caption = 'Edit Users'
ImageIndex = 1
object Panel1: TPanel
Left = 280
Top = 0
Width = 245
Height = 311
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object Label13: TLabel
Left = 14
Top = 82
Width = 38
Height = 13
Caption = 'Column:'
Visible = False
end
object LabelColumn: TLabel
Left = 84
Top = 82
Width = 61
Height = 13
Caption = 'LabelColumn'
Visible = False
end
object LabelTable: TLabel
Left = 84
Top = 66
Width = 53
Height = 13
Caption = 'LabelTable'
Visible = False
end
object LabelDB: TLabel
Left = 84
Top = 50
Width = 41
Height = 13
Caption = 'LabelDB'
Visible = False
end
object Label12: TLabel
Left = 14
Top = 66
Width = 30
Height = 13
Caption = 'Table:'
Visible = False
end
object Label11: TLabel
Left = 14
Top = 50
Width = 49
Height = 13
Caption = 'Database:'
Visible = False
end
object LabelPrivileges: TLabel
Left = 14
Top = 8
Width = 60
Height = 13
Caption = 'Privileges:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Visible = False
WordWrap = True
end
object LabelPleaseSelect: TLabel
Left = 40
Top = 96
Width = 142
Height = 39
Caption =
'Please select a user or doubleclick on a user to access items be' +
'low him.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
end
object LabelNoPrivs: TLabel
Left = 24
Top = 120
Width = 195
Height = 13
Caption = 'No Privileges are set for the selected item'
Visible = False
end
object LabelUser: TLabel
Left = 14
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -