📄 login.dfm
字号:
inherited frmlogin: Tfrmlogin
Left = 291
Top = 193
ActiveControl = usercode
BorderStyle = bsSingle
Caption = #29992#25143#30331#24405
ClientHeight = 306
ClientWidth = 426
Color = clScrollBar
Font.Charset = GB2312_CHARSET
OldCreateOrder = True
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Image1: TImage
Left = 0
Top = 0
Width = 426
Height = 65
Align = alTop
end
object pclogin: TPageControl
Left = 0
Top = 65
Width = 426
Height = 241
ActivePage = Tab1
Align = alClient
Style = tsFlatButtons
TabOrder = 0
object Tab1: TTabSheet
Caption = 'Tab1'
TabVisible = False
object Label2: TLabel
Left = 14
Top = 131
Width = 59
Height = 14
AutoSize = False
Caption = #30331#24405#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 200
Top = 131
Width = 35
Height = 14
AutoSize = False
Caption = #23494#30721
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = -24
Top = 155
Width = 444
Height = 2
end
object Label11: TLabel
Left = 22
Top = 203
Width = 363
Height = 14
AutoSize = False
Caption = #21019#24314#19968#20010#24080#22871#21518#65292#21021#22987#23494#30721#20026#65306'888888'#21363#21487#36827#20837#31995#32479#12290#20316#32773#65306#21016#31077
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object usercode: TEdit
Left = 77
Top = 126
Width = 110
Height = 18
CharCase = ecUpperCase
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 0
end
object password: TEdit
Left = 236
Top = 126
Width = 110
Height = 18
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
PasswordChar = '*'
TabOrder = 1
end
object btnok: TButton
Left = 268
Top = 164
Width = 70
Height = 25
Caption = #30830#23450
Default = True
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = btnokClick
end
object btnexit: TButton
Left = 340
Top = 164
Width = 70
Height = 25
Cancel = True
Caption = #36864#20986
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = btnexitClick
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 0
Width = 418
Height = 121
Align = alTop
Ctl3D = False
DataSource = dsqmaster
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]
ParentCtl3D = False
ReadOnly = True
TabOrder = 4
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnGetCellParams = DBGridEh1GetCellParams
Columns = <
item
EditButtons = <>
FieldName = 'fid'
Footers = <>
Title.Caption = '#'
Width = 40
end
item
EditButtons = <>
FieldName = 'accountname'
Footers = <>
Title.Caption = #24080#22871#21517#31216
Width = 100
end
item
EditButtons = <>
FieldName = 'databasename'
Footers = <>
Title.Caption = #25968#25454#24211#21517#31216
Width = 80
end
item
EditButtons = <>
FieldName = 'remark'
Footers = <>
Title.Caption = #22791#27880
Width = 150
end>
end
object Button1: TButton
Left = 4
Top = 164
Width = 86
Height = 25
Caption = #37325#26032#30331#24405
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = Button1Click
end
object Button2: TButton
Left = 92
Top = 164
Width = 86
Height = 25
Caption = #24080#22871#31649#29702
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = Button2Click
end
object Button3: TButton
Left = 180
Top = 164
Width = 86
Height = 25
Caption = #22791#20221'/'#24674#22797
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = Button3Click
end
end
object Tab2: TTabSheet
Caption = 'Tab2'
ImageIndex = 1
TabVisible = False
object Bevel2: TBevel
Left = -26
Top = 155
Width = 444
Height = 2
end
object Button4: TButton
Left = 268
Top = 164
Width = 70
Height = 25
Caption = #30830#23450
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button4Click
end
object Button5: TButton
Left = 340
Top = 164
Width = 70
Height = 25
Caption = #36820#22238
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button5Click
end
object GroupBox1: TGroupBox
Left = 8
Top = 0
Width = 401
Height = 145
Caption = #26381#21153#22120#36830#25509#35774#32622
TabOrder = 0
object Label1: TLabel
Left = 10
Top = 24
Width = 60
Height = 20
AutoSize = False
Caption = #30331#24405#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 10
Top = 52
Width = 60
Height = 20
AutoSize = False
Caption = #23494#30721
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 183
Top = 23
Width = 60
Height = 20
AutoSize = False
Caption = #26381#21153#22120#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 183
Top = 46
Width = 60
Height = 20
AutoSize = False
Caption = #26381#21153#22120'IP'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 10
Top = 80
Width = 60
Height = 20
AutoSize = False
Caption = #25968#25454#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 10
Top = 109
Width = 60
Height = 20
AutoSize = False
Caption = #31995#32479#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -