object X509CertsForm: TX509CertsForm
  Left = 0
  Top = 0
  Caption = 
    'ICS Automatically Download SSL X509 Certificates Development Dem' +
    'o - https://www.overbyte.eu  - 21 June 2025'
  ClientHeight = 800
  ClientWidth = 1206
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  TextHeight = 14
  object LogWin: TMemo
    Left = 0
    Top = 323
    Width = 1206
    Height = 477
    Align = alClient
    ScrollBars = ssBoth
    TabOrder = 0
    ExplicitTop = 322
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 1206
    Height = 323
    ActivePage = TabCommon
    Align = alTop
    TabOrder = 1
    OnChanging = PageControl1Changing
    object TabAcmeSuppliers: TTabSheet
      Caption = 'Acme Suppliers'
      ImageIndex = 10
      object SupplierList: TListView
        Left = 4
        Top = 4
        Width = 720
        Height = 285
        Columns = <
          item
            Caption = 'Account Title'
            Width = 170
          end
          item
            Caption = 'Acme Supplier Name'
            Width = 130
          end
          item
            Caption = 'Directory for Database and Files'
            Width = 400
          end
          item
          end>
        ColumnClick = False
        GridLines = True
        ReadOnly = True
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
        OnClick = SupplierListClick
        OnDblClick = SupplierListDblClick
      end
      object GroupBox2: TGroupBox
        Left = 764
        Top = 4
        Width = 353
        Height = 285
        Caption = 'Supplier Title and Name'
        TabOrder = 1
        object Label8: TLabel
          Left = 10
          Top = 20
          Width = 107
          Height = 28
          Caption = 'Supplier Account Title (used in IcsHosts)'
          WordWrap = True
        end
        object AcmeSupplier: TRadioGroup
          Left = 157
          Top = 51
          Width = 160
          Height = 226
          Caption = 'Acme Supplier Name'
          ItemIndex = 0
          Items.Strings = (
            'Let'#39's Encrypt'
            'Let'#39's Encrypt Testing'
            'Buypass'
            'Buypass Testing'
            'ZeroSSL'
            'Google'
            'Google Testing'
            'Digicert'
            'Digicert Testing'
            'Sslcom RSA'
            'Sslcom ECC')
          TabOrder = 0
          OnClick = AcmeSupplierClick
        end
        object SupplierTitle: TEdit
          Left = 133
          Top = 20
          Width = 204
          Height = 22
          TabOrder = 1
        end
        object doAccSaveNew: TButton
          Left = 10
          Top = 135
          Width = 130
          Height = 25
          Caption = 'Save New Account'
          TabOrder = 2
          OnClick = doAccSaveNewClick
        end
        object doAccImport: TButton
          Left = 10
          Top = 165
          Width = 130
          Height = 25
          Caption = 'Import Old Account'
          TabOrder = 3
          OnClick = doAccImportClick
        end
        object doAccDelete: TButton
          Left = 10
          Top = 195
          Width = 131
          Height = 25
          Caption = 'Delete Supplier Account'
          TabOrder = 4
          OnClick = doAccDeleteClick
        end
        object doAccOpenOld: TButton
          Left = 10
          Top = 75
          Width = 130
          Height = 25
          Caption = 'Open Supplier Account'
          Enabled = False
          TabOrder = 5
          OnClick = doAccOpenOldClick
        end
        object doAccClose: TButton
          Left = 10
          Top = 105
          Width = 130
          Height = 25
          Caption = 'Close Supplier Account'
          Enabled = False
          TabOrder = 6
          OnClick = doAccCloseClick
        end
        object doExit: TButton
          Left = 9
          Top = 250
          Width = 128
          Height = 25
          Caption = 'Exit'
          TabOrder = 7
          OnClick = doExitClick
        end
      end
    end
    object TabSupplierDetails: TTabSheet
      Caption = 'Supplier Details'
      ImageIndex = 3
      object BoxSupplierDetails: TGroupBox
        Left = 5
        Top = 5
        Width = 1187
        Height = 283
        Caption = 'Supplier Details -'
        TabOrder = 0
        object Label32: TLabel
          Left = 10
          Top = 50
          Width = 81
          Height = 28
          Caption = 'Private Key Type and Size'
          WordWrap = True
        end
        object Label31: TLabel
          Left = 11
          Top = 20
          Width = 44
          Height = 28
          Caption = 'Account Directory'
          WordWrap = True
        end
        object Label50: TLabel
          Left = 10
          Top = 235
          Width = 57
          Height = 14
          Caption = 'Admin Email'
        end
        object Label4: TLabel
          Left = 10
          Top = 115
          Width = 81
          Height = 14
          Caption = 'Account Number'
        end
        object Label6: TLabel
          Left = 10
          Top = 140
          Width = 85
          Height = 28
          Caption = 'External Account Binding KID'
          WordWrap = True
        end
        object Label7: TLabel
          Left = 10
          Top = 175
          Width = 76
          Height = 14
          Caption = 'EAB HMAC Key'
        end
        object Label54: TLabel
          Left = 415
          Top = 80
          Width = 85
          Height = 14
          AutoSize = False
          Caption = 'Socket Family'
          WordWrap = True
        end
        object Label1: TLabel
          Left = 10
          Top = 85
          Width = 66
          Height = 13
          AutoSize = False
          Caption = 'Proxy URL'
          WordWrap = True
        end
        object Label14: TLabel
          Left = 10
          Top = 205
          Width = 72
          Height = 14
          Caption = 'Debug Logging'
        end
        object LabelDB: TLabel
          Left = 782
          Top = 16
          Width = 401
          Height = 260
          AutoSize = False
          Caption = 'Supplier Information:'
          Color = clYellow
          ParentColor = False
          Transparent = False
          WordWrap = True
        end
        object DirCertWork: TEdit
          Left = 100
          Top = 20
          Width = 381
          Height = 22
          TabOrder = 0
        end
        object AccAcmeKeyType: TComboBox
          Left = 100
          Top = 50
          Width = 219
          Height = 22
          Style = csDropDownList
          ItemIndex = 1
          TabOrder = 1
          Text = 'RSA 2,048 bits (level 2 - 112 bits) '
          OnChange = SupplierChanged
          Items.Strings = (
            'RSA 1,024 bits (level 1 - 80 bits)'
            'RSA 2,048 bits (level 2 - 112 bits) '
            'RSA 3,072 bits (level 3 - 128 bits, NIST min)'
            'RSA 4,096 bits (level 3 - 128 bits)'
            'RSA 7,680 bits (level 4 - 192 bits)'
            'RSA 15,360 bits (level 5 - 256 bits)'
            'Elliptic Curve secp256  (level 3 - 128 bits) '
            'Elliptic Curve secp384  (level 4 - 192 bits) '
            'Elliptic Curve secp512  (level 5 - 256 bits) '
            'EdDSA ED25519 (level 3 - 128 bits)  ')
        end
        object SelDirAcmeAcc: TBitBtn
          Left = 504
          Top = 19
          Width = 31
          Height = 25
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
            333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
            300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
            333337F373F773333333303330033333333337F3377333333333303333333333
            333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
            333337777F337F33333330330BB00333333337F373F773333333303330033333
            333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
            333377777F77377733330BBB0333333333337F337F33333333330BB003333333
            333373F773333333333330033333333333333773333333333333}
          NumGlyphs = 2
          TabOrder = 2
          OnClick = SelDirAcmeAccClick
        end
        object SupplierEmail: TEdit
          Left = 100
          Top = 230
          Width = 221
          Height = 22
          TabOrder = 3
          OnChange = SupplierChanged
        end
        object AcmeAccountNum: TEdit
          Left = 100
          Top = 110
          Width = 291
          Height = 22
          TabOrder = 4
          OnChange = SupplierChanged
        end
        object AcmeEABKid: TEdit
          Left = 100
          Top = 140
          Width = 299
          Height = 22
          TabOrder = 5
          OnChange = SupplierChanged
        end
        object AcmeEABHmacKey: TEdit
          Left = 100
          Top = 170
          Width = 296
          Height = 22
          TabOrder = 6
          OnChange = SupplierChanged
        end
        object IpSocFamily: TComboBox
          Left = 513
          Top = 75
          Width = 102
          Height = 22
          Style = csDropDownList
          ItemIndex = 0
          TabOrder = 7
          Text = 'Any'
          OnChange = SupplierChanged
          Items.Strings = (
            'Any'
            'Prefer IPv4'
            'Prefer IPv6'
            'Only IPv4 '
            'Only IPv6')
        end
        object ProxyURL: TEdit
          Left = 100
          Top = 80
          Width = 297
          Height = 22
          Hint = 'Use a proxy URL, ie http://[user[:password]@]host:port'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 8
          OnChange = SupplierChanged
        end
        object doAccSuppSave: TButton
          Left = 640
          Top = 20
          Width = 130
          Height = 25
          Caption = 'Save Supplier Details'
          Enabled = False
          TabOrder = 9
          OnClick = doAccSuppSaveClick
        end
        object DebugLogging: TComboBox
          Left = 100
          Top = 200
          Width = 175
          Height = 22
          ItemIndex = 3
          TabOrder = 10
          Text = 'SSL Negotiation'
          OnChange = SupplierChanged
          Items.Strings = (
            'None'
            'Connections'
            'Parameters'
            'SSL Negotiation'
            'HTTP Headers'
            'HTML Body'
            'Ssl Low Level')
        end
        object LogPkeys: TCheckBox
          Left = 533
          Top = 50
          Width = 97
          Height = 17
          Caption = 'Log Private Keys'
          TabOrder = 11
          OnClick = SupplierChanged
        end
        object LogJson: TCheckBox
          Left = 415
          Top = 50
          Width = 97
          Height = 17
          Caption = 'Log Raw Json'
          TabOrder = 12
          OnClick = SupplierChanged
        end
        object doSupplierWeb: TButton
          Left = 640
          Top = 90
          Width = 130
          Height = 25
          Caption = 'Visit Supplier Web Site'
          TabOrder = 13
          OnClick = doSupplierWebClick
        end
        object doAccSuppClose: TButton
          Left = 640
          Top = 55
          Width = 130
          Height = 25
          Caption = 'Close Supplier Account'
          TabOrder = 14
          OnClick = doAccCloseClick
        end
        object GroupBox1: TGroupBox
          Left = 412
          Top = 120
          Width = 358
          Height = 151
          Caption = 'Account Local Web Server'
          TabOrder = 15
          object Label29: TLabel
            Left = 9
            Top = 15
            Width = 110
            Height = 13
            AutoSize = False
            Caption = 'IPv4/v6 Address'
          end
          object Label3: TLabel
            Left = 9
            Top = 58
            Width = 146
            Height = 14
            Caption = 'Optional Second IPv6 Address'
          end
          object LabelWebServer: TLabel
            Left = 8
            Top = 101
            Width = 337
            Height = 42
            AutoSize = False
            Caption = 'Web Server Status: Stopped'
            Color = clYellow
            ParentColor = False
            Transparent = False
            Visible = False
            WordWrap = True
          end
          object doStartLocalWeb: TButton
            Left = 208
            Top = 33
            Width = 86
            Height = 25
            Caption = 'Start Server'
            TabOrder = 0
            Visible = False
            OnClick = doStartLocalWebClick
          end
          object DomWebSrvIP: TComboBox
            Left = 9
            Top = 30
            Width = 185
            Height = 22
            TabOrder = 1
            Text = '0.0.0.0'
            OnChange = SupplierChanged
          end
          object DomWebSrvIP2: TComboBox
            Left = 9
            Top = 75
            Width = 185
            Height = 22
            TabOrder = 2
            OnChange = SupplierChanged
          end
          object doStopLocalWeb: TButton
            Left = 208
            Top = 61
            Width = 86
            Height = 25
            Caption = 'Stop Server'
            TabOrder = 3
            Visible = False
            OnClick = doStartLocalWebClick
          end
        end
      end
    end
    object TabSupplierOrders: TTabSheet
      Caption = 'Supplier Orders'
      ImageIndex = 8
      object LabelOrderList: TLabel
        Left = 10
        Top = 5
        Width = 497
        Height = 16
        AutoSize = False
        Caption = 'Supplier Certificate Orders'
      end
      object LabelInfoDomain: TLabel
        Left = 807
        Top = 5
        Width = 378
        Height = 245
        AutoSize = False
        Caption = 'Order Information:'
        Color = clYellow
        ParentColor = False
        Transparent = False
        WordWrap = True
      end
      object doDBCheck: TButton
        Left = 698
        Top = 5
        Width = 100
        Height = 20
        Caption = 'Check Order'
        Enabled = False
        TabOrder = 0
        OnClick = doDBCheckClick
      end
      object doDBFinalOrder: TButton
        Left = 700
        Top = 80
        Width = 100
        Height = 20
        Caption = 'Finalize Order'
        Enabled = False
        TabOrder = 2
        OnClick = doDBFinalOrderClick
      end
      object DatabaseDomains: TListView
        Left = 6
        Top = 24
        Width = 682
        Height = 261
        Columns = <
          item
            Caption = 'Common Name'
            Width = 180
          end
          item
            Caption = 'Order'
            Width = 80
          end
          item
            Caption = 'Issue State'
            Width = 70
          end
          item
            Caption = 'Order Id'
            Width = 80
          end
          item
            Caption = 'Issued'
            Width = 80
          end
          item
            Caption = 'Expires'
            Width = 80
          end
          item
            Caption = 'Renew From'
            Width = 80
          end
          item
            Caption = 'Challenge'
            Width = 130
          end
          item
            Caption = 'Profile'
            Width = 150
          end
          item
            Caption = 'Subject Alternate Names'
            Width = 300
          end>
        GridLines = True
        ReadOnly = True
        RowSelect = True
        TabOrder = 8
        ViewStyle = vsReport
        OnClick = DatabaseDomainsClick
        OnSelectItem = DatabaseDomainsSelectItem
      end
      object doDBRevoke: TButton
        Left = 699
        Top = 155
        Width = 100
        Height = 20
        Caption = 'Revoke Certificate'
        Enabled = False
        TabOrder = 6
        OnClick = doDBRevokeClick
      end
      object doDBCollect: TButton
        Left = 699
        Top = 105
        Width = 100
        Height = 20
        Caption = 'Collect Order'
        Enabled = False
        TabOrder = 4
        OnClick = doDBCollectClick
      end
      object doDBCancel: TButton
        Left = 699
        Top = 130
        Width = 100
        Height = 20
        Caption = 'Cancel Order'
        Enabled = False
        TabOrder = 5
        OnClick = doDBCancelClick
      end
      object doDBRemove: TButton
        Left = 699
        Top = 180
        Width = 100
        Height = 20
        Caption = 'Remove Order'
        Enabled = False
        TabOrder = 7
        OnClick = doDBRemoveClick
      end
      object doDBRedist: TButton
        Left = 1073
        Top = 255
        Width = 100
        Height = 25
        Caption = 'Redistribute'
        Enabled = False
        TabOrder = 3
        OnClick = doDBRedistClick
      end
      object doDBListChallg: TButton
        Left = 959
        Top = 255
        Width = 99
        Height = 25
        Caption = 'List Challenges'
        Enabled = False
        TabOrder = 9
        OnClick = doDBListChallgClick
      end
      object doDBStartOrder: TButton
        Left = 699
        Top = 30
        Width = 100
        Height = 20
        Caption = 'Start Order'
        Enabled = False
        TabOrder = 1
        OnClick = doDBStartOrderClick
      end
      object doDBResetOrder: TButton
        Left = 699
        Top = 205
        Width = 100
        Height = 20
        Caption = 'Reset Order'
        Enabled = False
        TabOrder = 10
        OnClick = doDBResetOrderClick
      end
      object doDBAccClose: TButton
        Left = 814
        Top = 255
        Width = 130
        Height = 25
        Caption = 'Close Supplier Account'
        TabOrder = 11
        OnClick = doAccCloseClick
      end
      object doDBEditOrder: TButton
        Left = 699
        Top = 255
        Width = 99
        Height = 25
        Caption = 'Edit Order'
        Enabled = False
        TabOrder = 12
        OnClick = doDBEditOrderClick
      end
      object doDBRenewal: TButton
        Left = 699
        Top = 230
        Width = 100
        Height = 20
        Caption = 'Renewal Info'
        Enabled = False
        TabOrder = 13
        OnClick = doDBRenewalClick
      end
      object doDBOrderStatus: TButton
        Left = 698
        Top = 55
        Width = 100
        Height = 20
        Caption = 'Order Status'
        Enabled = False
        TabOrder = 14
        OnClick = doDBOrderStatusClick
      end
    end
    object TabChallenges: TTabSheet
      Caption = 'Challenges'
      ImageIndex = 10
      TabVisible = False
      object Label47: TLabel
        Left = 10
        Top = 5
        Width = 152
        Height = 14
        Caption = 'Outstanding Domain Challenges'
      end
      object DatabaseChallg: TListView
        Left = 3
        Top = 25
        Width = 468
        Height = 196
        Columns = <>
        TabOrder = 0
        ViewStyle = vsReport
      end
    end
    object TabCommon: TTabSheet
      Caption = 'Accounts Common'
      object Label15: TLabel
        Left = 15
        Top = 15
        Width = 65
        Height = 14
        Caption = 'Log Directory'
      end
      object Label41: TLabel
        Left = 204
        Top = 124
        Width = 127
        Height = 14
        Caption = 'Private Key File Password'
      end
      object Label5: TLabel
        Left = 15
        Top = 51
        Width = 71
        Height = 14
        Caption = 'DNS Challenge'
      end
      object Label11: TLabel
        Left = 322
        Top = 52
        Width = 274
        Height = 14
        Caption = 'Local Windows DNS Server uses WMI to update records'
      end
      object Label12: TLabel
        Left = 204
        Top = 90
        Width = 138
        Height = 14
        Caption = 'Account Close imeout (mins)'
      end
      object DirLogs: TEdit
        Left = 105
        Top = 15
        Width = 382
        Height = 22
        TabOrder = 0
        OnExit = DirLogsExit
      end
      object PrivKeyCipher: TRadioGroup
        Left = 15
        Top = 110
        Width = 165
        Height = 130
        Caption = 'Private Key File Encryption'
        ItemIndex = 5
        Items.Strings = (
          'None'
          'Triple DES'
          'IDEA'
          'AES128'
          'AES192'
          'AES256')
        TabOrder = 3
      end
      object PrivKeyPassword: TEdit
        Left = 353
        Top = 119
        Width = 108
        Height = 22
        PasswordChar = '*'
        TabOrder = 2
        Text = 'password'
      end
      object SelDirLogs: TBitBtn
        Left = 502
        Top = 16
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 1
        OnClick = SelDirLogsClick
      end
      object DnsChlgType: TComboBox
        Left = 105
        Top = 50
        Width = 187
        Height = 22
        ItemIndex = 0
        TabOrder = 4
        Text = 'Local Windows DNS Server'
        OnChange = SupplierChanged
        Items.Strings = (
          'Local Windows DNS Server'
          'Cloudfare DNS Server')
      end
      object DnsSkipLocalTest: TCheckBox
        Left = 15
        Top = 85
        Width = 171
        Height = 17
        Caption = 'Skip Loca DNS lTesting'
        TabOrder = 5
      end
      object AccCloseMins: TEdit
        Left = 370
        Top = 85
        Width = 51
        Height = 22
        TabOrder = 6
        Text = '5'
        OnExit = DirLogsExit
      end
    end
    object TabDomain: TTabSheet
      Caption = 'Cert Domain'
      ImageIndex = 4
      object Label9: TLabel
        Left = 10
        Top = 5
        Width = 161
        Height = 14
        Caption = 'Certificate Domain Common Name'
      end
      object Label23: TLabel
        Left = 400
        Top = 5
        Width = 469
        Height = 14
        Caption = 
          'Certificate SAN (Subject Alternate Names)  - Common Name will be' +
          ' added automatically, if missing'
      end
      object CertSANGrid: TStringGrid
        Left = 400
        Top = 25
        Width = 781
        Height = 238
        ColCount = 4
        DefaultRowHeight = 20
        FixedCols = 0
        RowCount = 10
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing]
        TabOrder = 3
        ColWidths = (
          160
          281
          350
          225)
      end
      object CertCommonName: TEdit
        Left = 10
        Top = 20
        Width = 242
        Height = 22
        TabOrder = 0
      end
      object doClearDomain: TButton
        Left = 268
        Top = 20
        Width = 96
        Height = 25
        Caption = 'Clear Domains'
        TabOrder = 1
        OnClick = doClearDomainClick
      end
      object BoxCertFmts: TGroupBox
        Left = 10
        Top = 53
        Width = 365
        Height = 104
        Caption = 'Output Certificate Formats'
        TabOrder = 2
        object CertOutFmtSep: TCheckBox
          Left = 15
          Top = 20
          Width = 146
          Height = 17
          Caption = 'Separate PEM Files'
          TabOrder = 0
        end
        object CertOutFmtBudl: TCheckBox
          Left = 15
          Top = 40
          Width = 97
          Height = 17
          Caption = 'PEM Bundle File'
          Checked = True
          State = cbChecked
          TabOrder = 1
        end
        object CertOutFmtP12: TCheckBox
          Left = 15
          Top = 60
          Width = 146
          Height = 17
          Caption = 'PKCS12/PFX Bundle File'
          Checked = True
          State = cbChecked
          TabOrder = 2
        end
        object CertOutFmtP7: TCheckBox
          Left = 15
          Top = 80
          Width = 121
          Height = 17
          Caption = 'PKCS7 Bundle File'
          TabOrder = 3
        end
        object CertOutFmtReq: TCheckBox
          Left = 185
          Top = 20
          Width = 97
          Height = 21
          Caption = 'CSR PEM File'
          TabOrder = 4
        end
        object CertPwPemKeys: TCheckBox
          Left = 185
          Top = 40
          Width = 146
          Height = 17
          Caption = 'Password PEM Keys'
          TabOrder = 5
        end
        object CertPwPkcs12: TCheckBox
          Left = 185
          Top = 60
          Width = 154
          Height = 17
          Caption = 'Password PKCS12 Keys'
          Checked = True
          State = cbChecked
          TabOrder = 6
        end
        object CertWindowsStore: TCheckBox
          Left = 185
          Top = 80
          Width = 154
          Height = 17
          Caption = 'Windows Cert Store'
          TabOrder = 7
        end
      end
    end
    object TabInfo: TTabSheet
      Caption = 'Cert Admin'
      ImageIndex = 6
      object lbCountry: TLabel
        Left = 585
        Top = 165
        Width = 66
        Height = 14
        Caption = 'Country Code'
      end
      object lbState: TLabel
        Left = 585
        Top = 135
        Width = 62
        Height = 14
        Caption = 'State/County'
      end
      object lbLocality: TLabel
        Left = 585
        Top = 105
        Width = 37
        Height = 14
        Caption = 'Locality'
      end
      object lbOrganization: TLabel
        Left = 585
        Top = 15
        Width = 91
        Height = 14
        Caption = 'Organization Name'
      end
      object lbOrganizationalUnit: TLabel
        Left = 585
        Top = 45
        Width = 90
        Height = 14
        Caption = 'Organizational Unit'
      end
      object lbEMail: TLabel
        Left = 300
        Top = 45
        Width = 24
        Height = 14
        Caption = 'Email'
      end
      object Label17: TLabel
        Left = 340
        Top = 15
        Width = 51
        Height = 14
        Caption = 'Last Name'
      end
      object Label18: TLabel
        Left = 300
        Top = 75
        Width = 70
        Height = 14
        Caption = 'Phone Number'
      end
      object Label19: TLabel
        Left = 10
        Top = 15
        Width = 62
        Height = 14
        Caption = 'Contact: Title'
      end
      object Label20: TLabel
        Left = 585
        Top = 75
        Width = 42
        Height = 14
        Caption = 'Address'
      end
      object Label21: TLabel
        Left = 762
        Top = 165
        Width = 67
        Height = 14
        Caption = 'Zip/Post Code'
      end
      object Label24: TLabel
        Left = 135
        Top = 15
        Width = 54
        Height = 14
        Caption = ' First Name'
      end
      object CertCountry: TEdit
        Left = 706
        Top = 160
        Width = 31
        Height = 22
        TabOrder = 10
      end
      object CertState: TEdit
        Left = 706
        Top = 130
        Width = 190
        Height = 22
        TabOrder = 9
      end
      object CertLocality: TEdit
        Left = 706
        Top = 100
        Width = 190
        Height = 22
        TabOrder = 8
      end
      object CertOrganization: TEdit
        Left = 706
        Top = 10
        Width = 215
        Height = 22
        TabOrder = 5
      end
      object CertOrganizationalUnit: TEdit
        Left = 706
        Top = 40
        Width = 215
        Height = 22
        TabOrder = 6
      end
      object CertContactEmail: TEdit
        Left = 340
        Top = 40
        Width = 221
        Height = 22
        TabOrder = 3
      end
      object CertContactFirst: TEdit
        Left = 200
        Top = 10
        Width = 121
        Height = 22
        TabOrder = 1
      end
      object CertContactLast: TEdit
        Left = 410
        Top = 10
        Width = 151
        Height = 22
        TabOrder = 2
      end
      object CertPhone: TEdit
        Left = 385
        Top = 70
        Width = 176
        Height = 22
        TabOrder = 4
      end
      object CertAddress: TEdit
        Left = 706
        Top = 70
        Width = 215
        Height = 22
        TabOrder = 7
      end
      object CertPostCode: TEdit
        Left = 850
        Top = 160
        Width = 96
        Height = 22
        TabOrder = 11
      end
      object CertContactTitle: TEdit
        Left = 91
        Top = 10
        Width = 38
        Height = 22
        TabOrder = 0
      end
      object PrivKeyType: TRadioGroup
        Left = 10
        Top = 38
        Width = 266
        Height = 201
        Caption = 'Private Key Type and Size'
        ItemIndex = 1
        Items.Strings = (
          'RSA 1,024 bits (level 1 - 80 bits)'
          'RSA 2,048 bits (level 2 - 112 bits) '
          'RSA 3,072 bits (level 3 - 128 bits, NIST min)'
          'RSA 4,096 bits (level 3 - 128 bits)'
          'RSA 7,680 bits (level 4 - 192 bits)'
          'RSA 15,360 bits (level 5 - 256 bits)'
          'Elliptic Curve secp256  (level 3 - 128 bits) '
          'Elliptic Curve secp384  (level 4 - 192 bits) '
          'Elliptic Curve secp512  (level 5 - 256 bits) '
          'EdDSA ED25519 (level 3 - 128 bits)  ')
        TabOrder = 12
      end
      object CertSignDigestType: TRadioGroup
        Left = 287
        Top = 106
        Width = 103
        Height = 183
        Caption = 'Sign Digest Type'
        ItemIndex = 2
        Items.Strings = (
          'SHA1 (old)'
          'SHA224'
          'SHA256'
          'SHA384'
          'SHA512'
          'SHA3_224'
          'SHA3_256'
          'SHA3_384'
          'SHA3_512')
        TabOrder = 13
      end
      object CertSerNumType: TRadioGroup
        Left = 425
        Top = 116
        Width = 110
        Height = 56
        Caption = 'Serial Number Type'
        ItemIndex = 0
        Items.Strings = (
          'Random'
          'Sequential')
        TabOrder = 14
      end
      object CertMsStoreLoc: TRadioGroup
        Left = 425
        Top = 181
        Width = 138
        Height = 59
        Caption = 'Wndows Store Location'
        ItemIndex = 1
        Items.Strings = (
          'Current User'
          'Local Machine')
        TabOrder = 15
      end
    end
    object TabNewOrderr: TTabSheet
      Caption = 'Supplier New Order'
      ImageIndex = 2
      object LabelAcme2Info: TLabel
        Left = 611
        Top = 103
        Width = 573
        Height = 154
        AutoSize = False
        Caption = 'Information:'
        Color = clYellow
        ParentColor = False
        Transparent = False
        WordWrap = True
      end
      object Label51: TLabel
        Left = 203
        Top = 67
        Width = 149
        Height = 14
        Caption = 'Certificate Signing Request File'
      end
      object Label52: TLabel
        Left = 203
        Top = 112
        Width = 242
        Height = 14
        Caption = 'Private Key File, optional (needed to build bundles)'
      end
      object Label2: TLabel
        Left = 203
        Top = 159
        Width = 222
        Height = 14
        Caption = 'Web Server UNC HTTP .Well-Known Directory'
      end
      object Label13: TLabel
        Left = 208
        Top = 204
        Width = 218
        Height = 14
        Caption = 'Web Server UNC Public Certificates Directory'
      end
      object Label10: TLabel
        Left = 610
        Top = 15
        Width = 92
        Height = 14
        Caption = 'Cert Profile or Type'
      end
      object Label42: TLabel
        Left = 610
        Top = 66
        Width = 175
        Height = 28
        Caption = 'Certificate Period (days)'#13#10'(usually 90, minimum 3, Google only)'
      end
      object doAcmeCheckOrder: TButton
        Left = 140
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Check Order (1)'
        TabOrder = 3
        OnClick = doAcmeCheckOrderClick
      end
      object doAcmeStartChallng: TButton
        Left = 530
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Start Challenges (4)'
        Enabled = False
        TabOrder = 0
        OnClick = doAcmeStartChallngClick
      end
      object doAcmeCollectCert: TButton
        Left = 920
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Collect Certificate (7)'
        Enabled = False
        TabOrder = 1
        OnClick = doAcmeCollectCertClick
      end
      object doAcmeSaveOrder: TButton
        Left = 10
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Save Order'
        TabOrder = 2
        OnClick = doAcmeSaveOrderClick
      end
      object doAcmeStartOrder: TButton
        Left = 270
        Top = 264
        Width = 113
        Height = 25
        Caption = 'Start Order (2)'
        Enabled = False
        TabOrder = 5
        OnClick = doAcmeStartOrderClick
      end
      object doAcmeTestChallng: TButton
        Left = 400
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Test Challenges (3)'
        Enabled = False
        TabOrder = 4
        OnClick = doAcmeTestChallngClick
      end
      object SuppCertChallenge: TRadioGroup
        Left = 10
        Top = 7
        Width = 183
        Height = 245
        Caption = 'Domain Challenge Method'
        ItemIndex = 0
        Items.Strings = (
          'None'
          'File - Web Server - UNC'
          'File - Web Server - FTP'
          'File - Local Web Server'
          'File - App Web Server'
          'DNS - Automatic'
          'DNS Account - Automatic'
          'DNS - Manual'
          'Email manually'
          'TLS-ALPN Cert - Web UNC'
          'TLS-ALPN Cert - Local Web'
          'TLS-ALPN Cert - App Web')
        TabOrder = 6
      end
      object AutoOrderComplete: TCheckBox
        Left = 610
        Top = 42
        Width = 189
        Height = 16
        Caption = 'Automatic Order Completion'
        Checked = True
        State = cbChecked
        TabOrder = 7
      end
      object CertCsrOrigin: TRadioGroup
        Left = 199
        Top = 6
        Width = 214
        Height = 59
        Caption = 'Certificate CSR Origin'
        ItemIndex = 0
        Items.Strings = (
          'From Properties, creates new key'
          'From CSR File, old private key')
        TabOrder = 8
      end
      object SelCertOldPrvKey: TBitBtn
        Left = 566
        Top = 128
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 9
        OnClick = SelCertOldPrvKeyClick
      end
      object SelCertOldCsrFile: TBitBtn
        Left = 566
        Top = 81
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 10
        OnClick = SelCertOldCsrFileClick
      end
      object doCheckCSR: TButton
        Left = 430
        Top = 16
        Width = 96
        Height = 25
        Caption = 'Check CSR'
        TabOrder = 11
        OnClick = doCheckCSRClick
      end
      object CertOldPrvKey: TEdit
        Left = 203
        Top = 130
        Width = 352
        Height = 22
        TabOrder = 12
      end
      object CertOldCsrFile: TEdit
        Left = 203
        Top = 82
        Width = 352
        Height = 22
        TabOrder = 13
      end
      object DirWellKnown: TEdit
        Left = 203
        Top = 174
        Width = 352
        Height = 22
        TabOrder = 14
      end
      object DirPubWebCert: TEdit
        Left = 206
        Top = 224
        Width = 352
        Height = 22
        TabOrder = 15
      end
      object SelDirWellKnown: TBitBtn
        Left = 566
        Top = 172
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 16
        OnClick = SelDirWellKnownClick
      end
      object SelDirPubWebCert: TBitBtn
        Left = 566
        Top = 224
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 17
        OnClick = SelDirPubWebCertClick
      end
      object CertProfile: TComboBox
        Left = 730
        Top = 10
        Width = 213
        Height = 22
        TabOrder = 18
        Text = 'classic'
      end
      object doAcmeOrderClose: TButton
        Left = 1050
        Top = 265
        Width = 130
        Height = 25
        Caption = 'Close Supplier Account'
        TabOrder = 19
        OnClick = doAccCloseClick
      end
      object CertValidity: TEdit
        Left = 817
        Top = 70
        Width = 35
        Height = 22
        MaxLength = 3
        TabOrder = 20
        Text = '90'
      end
      object doAcmeOrderStatus: TButton
        Left = 660
        Top = 265
        Width = 113
        Height = 25
        Caption = 'Order Status (5)'
        Enabled = False
        TabOrder = 21
        OnClick = doAcmeOrderStatusClick
      end
      object doAcmeFinalOrder: TButton
        Left = 793
        Top = 263
        Width = 113
        Height = 25
        Caption = 'Finalize Order (6)'
        Enabled = False
        TabOrder = 22
        OnClick = doAcmeFinalOrderClick
      end
    end
    object TabOwnCA: TTabSheet
      Caption = 'Own CA'
      ImageIndex = 9
      object Label48: TLabel
        Left = 10
        Top = 205
        Width = 96
        Height = 14
        Caption = 'Certificate Directory'
      end
      object LabelCertOwnCA: TLabel
        Left = 650
        Top = 65
        Width = 363
        Height = 198
        AutoSize = False
        Caption = 'Information'
        Color = clYellow
        ParentColor = False
        Transparent = False
        WordWrap = True
      end
      object CABox: TGroupBox
        Left = 10
        Top = 6
        Width = 631
        Height = 183
        Caption = 'Own Certificate Authority - for signing certificates'
        TabOrder = 0
        object Label44: TLabel
          Left = 10
          Top = 55
          Width = 91
          Height = 14
          Caption = 'CA Private Key File'
        end
        object Label46: TLabel
          Left = 10
          Top = 20
          Width = 82
          Height = 28
          Caption = 'CA Certificate or Bundle File'
          WordWrap = True
        end
        object LabelOwnCA: TLabel
          Left = 118
          Top = 110
          Width = 501
          Height = 61
          AutoSize = False
          Caption = 'CA Information'
          Color = clYellow
          ParentColor = False
          Transparent = False
          WordWrap = True
        end
        object Label49: TLabel
          Left = 10
          Top = 85
          Width = 125
          Height = 14
          Caption = 'CA Private Key Password'
        end
        object Label28: TLabel
          Left = 270
          Top = 85
          Width = 321
          Height = 14
          Caption = 
            'You can create the CA certificate using the Self Signed Cert but' +
            'ton'
        end
        object CAPkeyFile: TEdit
          Left = 115
          Top = 50
          Width = 454
          Height = 22
          TabOrder = 2
        end
        object CACertFile: TEdit
          Left = 115
          Top = 20
          Width = 454
          Height = 22
          TabOrder = 0
        end
        object SelCACertFile: TBitBtn
          Left = 583
          Top = 20
          Width = 31
          Height = 25
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
            333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
            300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
            333337F373F773333333303330033333333337F3377333333333303333333333
            333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
            333337777F337F33333330330BB00333333337F373F773333333303330033333
            333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
            333377777F77377733330BBB0333333333337F337F33333333330BB003333333
            333373F773333333333330033333333333333773333333333333}
          NumGlyphs = 2
          TabOrder = 1
          OnClick = SelCACertFileClick
        end
        object SelCAPkeyFile: TBitBtn
          Left = 583
          Top = 50
          Width = 31
          Height = 25
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
            333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
            300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
            333337F373F773333333303330033333333337F3377333333333303333333333
            333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
            333337777F337F33333330330BB00333333337F373F773333333303330033333
            333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
            333377777F77377733330BBB0333333333337F337F33333333330BB003333333
            333373F773333333333330033333333333333773333333333333}
          NumGlyphs = 2
          TabOrder = 3
          OnClick = SelCAPkeyFileClick
        end
        object doLoadCA: TButton
          Left = 14
          Top = 123
          Width = 75
          Height = 25
          Caption = 'Load CA'
          TabOrder = 5
          OnClick = doLoadCAClick
        end
        object CAPkeyPw: TEdit
          Left = 154
          Top = 80
          Width = 97
          Height = 22
          PasswordChar = '*'
          TabOrder = 4
        end
      end
      object doSelfSigned: TButton
        Left = 801
        Top = 22
        Width = 103
        Height = 25
        Caption = 'Self Signed Cert'
        TabOrder = 3
        OnClick = doSelfSignedClick
      end
      object doCASignCert: TButton
        Left = 657
        Top = 25
        Width = 102
        Height = 25
        Caption = 'CA Signed Cert'
        TabOrder = 2
        OnClick = doCASignCertClick
      end
      object OwnCACertDir: TEdit
        Left = 137
        Top = 200
        Width = 442
        Height = 22
        TabOrder = 1
      end
      object SelOwnCACertDir: TBitBtn
        Left = 593
        Top = 200
        Width = 31
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
          333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
          300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
          333337F373F773333333303330033333333337F3377333333333303333333333
          333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
          333337777F337F33333330330BB00333333337F373F773333333303330033333
          333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
          333377777F77377733330BBB0333333333337F337F33333333330BB003333333
          333373F773333333333330033333333333333773333333333333}
        NumGlyphs = 2
        TabOrder = 4
        OnClick = SelOwnCACertDirClick
      end
      object SelfSignedCA: TCheckBox
        Left = 910
        Top = 29
        Width = 97
        Height = 17
        Caption = 'CA Cert'
        TabOrder = 5
      end
    end
  end
  object X509Certs1: TSslX509Certs
    AcmeAccKeyType = PrivKeyRsa2048
    AutoOrderComplete = False
    CertSubAltNames = <>
    CertCsrOrigin = CsrOriginProps
    CertOutFmts = []
    CertSerNumType = SerNumRandom
    CertSignDigestType = Digest_sha256
    CertValidity = 0
    DebugLevel = DebugConn
    DomWebSrvIP = '0.0.0.0'
    DomWebSrvIP2 = '::'
    MsCertLoc = MsLocMachine
    KeepOldCA = False
    LogJson = False
    LogPkeys = False
    OAAuthType = OAuthTypeWeb
    OARefreshAuto = False
    OARefrMinsPrior = 120
    OAWebSrvIP = '127.0.0.1'
    OAWebSrvPort = '8080'
    PrivKeyCipher = PrivKeyEncNone
    PrivKeyType = PrivKeyRsa2048
    AutoAccountClose = False
    AccountTimeOutMins = 10
    SeqOrderNum = 0
    SocketFamily = sfAny
    SuppCertChallenge = ChallFileUNC
    SupplierProto = SuppProtoNone
    SupplierTitle = 'Unknown Supplier'
    AcmeSupplier = AcmeLetsEncrypt
    OnCertProg = X509Certs1CertProg
    OnNewCert = X509Certs1NewCert
    OnDomainsRefresh = X509Certs1DomainsRefresh
    OnSuppDBRefresh = X509Certs1SuppDBRefresh
    OnChallgRefresh = X509Certs1ChallgRefresh
    OnChallengeEmail = X509Certs1ChallengeEmail
    OnChallengeFTP = X509Certs1ChallengeFTP
    OnChallengeDNS = X509Certs1ChallengeDNS
    Left = 74
    Top = 656
  end
  object OpenDirDiag: TOpenDialog
    Options = [ofHideReadOnly, ofNoValidate, ofPathMustExist, ofNoTestFileCreate, ofEnableSizing]
    Title = 'Select Directory'
    Left = 254
    Top = 662
  end
  object OpenFileDlg: TOpenDialog
    Filter = 'All Files *.*|*.*|PEM Files *.pem|*.pem'
    Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Title = 'Select Certificate File'
    Left = 162
    Top = 662
  end
  object CloseTimer: TTimer
    Enabled = False
    Interval = 5000
    OnTimer = CloseTimerTimer
    Left = 351
    Top = 664
  end
end