mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2024-11-16 08:15:55 +01:00
d0838e2438
Added a certificate selection form to the MiniBrowser VCL demo
79 lines
1.6 KiB
Plaintext
79 lines
1.6 KiB
Plaintext
object SelectCertForm: TSelectCertForm
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'Select a certificate'
|
|
ClientHeight = 441
|
|
ClientWidth = 612
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 15
|
|
object ButtonPnl: TPanel
|
|
Left = 0
|
|
Top = 405
|
|
Width = 612
|
|
Height = 36
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
Padding.Left = 50
|
|
Padding.Right = 50
|
|
Padding.Bottom = 10
|
|
TabOrder = 0
|
|
object SelectBtn: TButton
|
|
Left = 50
|
|
Top = 0
|
|
Width = 150
|
|
Height = 26
|
|
Align = alLeft
|
|
Caption = 'Select'
|
|
Enabled = False
|
|
ModalResult = 1
|
|
TabOrder = 0
|
|
OnClick = SelectBtnClick
|
|
end
|
|
object CancelBtn: TButton
|
|
Left = 412
|
|
Top = 0
|
|
Width = 150
|
|
Height = 26
|
|
Align = alRight
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 1
|
|
OnClick = CancelBtnClick
|
|
end
|
|
end
|
|
object CertificatesPnl: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 612
|
|
Height = 405
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
Padding.Left = 10
|
|
Padding.Top = 10
|
|
Padding.Right = 10
|
|
Padding.Bottom = 10
|
|
TabOrder = 1
|
|
object CertificatesLb: TListBox
|
|
Left = 10
|
|
Top = 10
|
|
Width = 592
|
|
Height = 385
|
|
Align = alClient
|
|
ItemHeight = 15
|
|
TabOrder = 0
|
|
OnClick = CertificatesLbClick
|
|
end
|
|
end
|
|
end
|