Initial commit
This commit is contained in:
@@ -0,0 +1,93 @@
|
||||
object VerifyCodeForm: TVerifyCodeForm
|
||||
Left = 0
|
||||
Top = 0
|
||||
BorderIcons = []
|
||||
BorderStyle = bsNone
|
||||
Caption = 'VerifyCode'
|
||||
ClientHeight = 156
|
||||
ClientWidth = 284
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -12
|
||||
Font.Name = 'Segoe UI'
|
||||
Font.Style = []
|
||||
KeyPreview = True
|
||||
Position = poMainFormCenter
|
||||
Scaled = False
|
||||
OnCreate = FormCreate
|
||||
OnKeyDown = FormKeyDown
|
||||
TextHeight = 15
|
||||
object GeneralDialogPanel1: TGeneralDialogPanel
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 284
|
||||
Height = 156
|
||||
Align = alClient
|
||||
Caption = #20154#26426#39564#35777
|
||||
Color = 5064257
|
||||
ParentBackground = False
|
||||
TabOrder = 0
|
||||
object m_imgCode: TImage
|
||||
Left = 140
|
||||
Top = 52
|
||||
Width = 120
|
||||
Height = 36
|
||||
Hint = #28857#20987#21047#26032
|
||||
Center = True
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
OnClick = CodeImgClick
|
||||
end
|
||||
object m_btnOk: TTextButton
|
||||
Left = 99
|
||||
Top = 110
|
||||
Width = 85
|
||||
Height = 30
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
OnClick = OkClick
|
||||
Text = #30830#23450
|
||||
end
|
||||
object m_editCode: TLineEdit
|
||||
Left = 20
|
||||
Top = 50
|
||||
Width = 120
|
||||
Height = 40
|
||||
ParentCustomHint = False
|
||||
Alignment = taCenter
|
||||
HintText = #20154#26426#39564#35777#30721
|
||||
NumberMax = -1
|
||||
NumberMin = -1
|
||||
Color = 15591652
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -19
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
TabOrder = 0
|
||||
end
|
||||
end
|
||||
object RESTClient: TRESTClient
|
||||
Accept = 'application/json, text/plain; q=0.9, text/html;q=0.8,'
|
||||
AcceptCharset = 'utf-8, *;q=0.8'
|
||||
Params = <>
|
||||
SynchronizedEvents = False
|
||||
Left = 192
|
||||
Top = 131
|
||||
end
|
||||
object RESTRequest: TRESTRequest
|
||||
Client = RESTClient
|
||||
Params = <>
|
||||
Response = RESTResponse
|
||||
SynchronizedEvents = False
|
||||
Left = 232
|
||||
Top = 131
|
||||
end
|
||||
object RESTResponse: TRESTResponse
|
||||
ContentType = 'application/json'
|
||||
ContentEncoding = 'UTF-8'
|
||||
Left = 200
|
||||
Top = 131
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user