105 lines
2.2 KiB
ObjectPascal
105 lines
2.2 KiB
ObjectPascal
object LoginForm: TLoginForm
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsDialog
|
|
Caption = #32593#31449#30331#24405
|
|
ClientHeight = 470
|
|
ClientWidth = 600
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poMainFormCenter
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
TextHeight = 15
|
|
object m_lblSpec: TLabel
|
|
Left = 488
|
|
Top = 439
|
|
Width = 97
|
|
Height = 19
|
|
Cursor = crHandPoint
|
|
Hint = #28857#20987#26597#30475#30331#24405#25805#20316#35828#26126
|
|
ParentCustomHint = False
|
|
Alignment = taRightJustify
|
|
AutoSize = False
|
|
Caption = #26597#30475#25805#20316#35828#26126
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlue
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = [fsUnderline]
|
|
ParentFont = False
|
|
ParentShowHint = False
|
|
ShowAccelChar = False
|
|
ShowHint = True
|
|
Layout = tlCenter
|
|
OnClick = OnSpecClick
|
|
OnMouseEnter = SpecMouseEnter
|
|
OnMouseLeave = SpecMouseLeave
|
|
end
|
|
object m_panSpec: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 600
|
|
Height = 298
|
|
AutoSize = True
|
|
BevelKind = bkFlat
|
|
BevelOuter = bvNone
|
|
ShowCaption = False
|
|
TabOrder = 0
|
|
object m_imgBack: TImage
|
|
Left = 0
|
|
Top = 0
|
|
Width = 596
|
|
Height = 294
|
|
ParentCustomHint = False
|
|
Align = alClient
|
|
Center = True
|
|
ParentShowHint = False
|
|
ShowHint = False
|
|
Stretch = True
|
|
end
|
|
end
|
|
object m_memTxt: TMemo
|
|
Left = 0
|
|
Top = 302
|
|
Width = 600
|
|
Height = 121
|
|
BevelInner = bvNone
|
|
BevelKind = bkFlat
|
|
BevelOuter = bvNone
|
|
Color = clBlack
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clLime
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ScrollBars = ssBoth
|
|
TabOrder = 1
|
|
WordWrap = False
|
|
end
|
|
object m_btnLogin: TButton
|
|
Left = 269
|
|
Top = 435
|
|
Width = 75
|
|
Height = 25
|
|
Caption = #30331#24405
|
|
TabOrder = 2
|
|
OnClick = OnLoginClick
|
|
end
|
|
object m_cbAuto: TCheckBox
|
|
Left = 16
|
|
Top = 439
|
|
Width = 97
|
|
Height = 17
|
|
Caption = #19979#27425#33258#21160#30331#24405
|
|
TabOrder = 3
|
|
OnClick = AutoClick
|
|
end
|
|
end
|