object frmPemTool1: TfrmPemTool1
  Left = 274
  Top = 192
  Width = 535
  Height = 364
  Color = clBtnFace
  Constraints.MinHeight = 364
  Constraints.MinWidth = 535
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object btnShowCert: TButton
    Left = 448
    Top = 24
    Width = 75
    Height = 21
    Anchors = [akTop, akRight]
    Caption = '&View PEM'
    TabOrder = 1
    OnClick = btnShowCertClick
  end
  object PageControl1: TPageControl
    Left = 2
    Top = 2
    Width = 435
    Height = 316
    ActivePage = TabCertLv
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    OnChange = PageControl1Change
    object TabCertLv: TTabSheet
      Caption = 'Certificates'
      object Label4: TLabel
        Left = 4
        Top = 266
        Width = 47
        Height = 14
        Anchors = [akLeft, akBottom]
        Caption = 'Directory:'
      end
      object LvCerts: TListView
        Left = 4
        Top = 6
        Width = 419
        Height = 250
        Anchors = [akLeft, akTop, akRight, akBottom]
        Columns = <
          item
            AutoSize = True
            Caption = 'Issued to'
          end
          item
            AutoSize = True
            Caption = 'Issuer'
          end
          item
            Caption = 'Expires at'
            Width = 65
          end
          item
            Caption = 'File Name'
            Width = 70
          end>
        ReadOnly = True
        RowSelect = True
        PopupMenu = pmLv
        SmallImages = ImageList1
        SortType = stData
        TabOrder = 0
        ViewStyle = vsReport
        OnColumnClick = LvCertsColumnClick
        OnCompare = LvCertsCompare
        OnCustomDraw = LvCertsCustomDraw
        OnDblClick = LvCertsDblClick
      end
      object btnRefresh: TButton
        Left = 352
        Top = 263
        Width = 71
        Height = 21
        Anchors = [akRight, akBottom]
        Caption = '&Refresh'
        TabOrder = 4
        OnClick = btnRefreshClick
      end
      object CurrentCertDirEdit: TEdit
        Left = 54
        Top = 262
        Width = 129
        Height = 22
        Anchors = [akLeft, akRight, akBottom]
        TabOrder = 1
        Text = 'CurrentCertDirEdit'
        OnChange = CurrentCertDirEditChange
      end
      object btnDeleteCert: TButton
        Left = 272
        Top = 263
        Width = 75
        Height = 21
        Anchors = [akRight, akBottom]
        Caption = '&Delete'
        TabOrder = 3
        OnClick = btnDeleteCertClick
      end
      object btnCopyCert: TButton
        Left = 192
        Top = 263
        Width = 75
        Height = 21
        Anchors = [akRight, akBottom]
        Caption = '&Copy'
        TabOrder = 2
        OnClick = btnCopyCertClick
      end
    end
    object TabImport: TTabSheet
      Caption = 'Import Certificates'
      ImageIndex = 1
      object Bevel2: TBevel
        Left = 4
        Top = 236
        Width = 419
        Height = 64
        Anchors = [akLeft, akTop, akRight]
        Shape = bsFrame
      end
      object Bevel1: TBevel
        Left = 4
        Top = 6
        Width = 419
        Height = 225
        Anchors = [akLeft, akTop, akRight]
        Shape = bsFrame
      end
      object Label1: TLabel
        Left = 20
        Top = 28
        Width = 327
        Height = 56
        Caption = 
          'Current user'#39's Windows-System-Certificate-Store is opened.'#13#10'Then' +
          ' the DER formated certs are read and translated to PEM format.'#13#10 +
          'Certs are stored to the specified folder in the form of Hash.0.'#13 +
          #10'The '#39'Cert. Store Type'#39' box has static values: CA, ROOT, MY.'
      end
      object Label3: TLabel
        Left = 22
        Top = 94
        Width = 82
        Height = 14
        Caption = 'Cert. Store Type:'
      end
      object Label2: TLabel
        Left = 22
        Top = 118
        Width = 75
        Height = 14
        Caption = 'Destination Dir.:'
      end
      object Label5: TLabel
        Left = 20
        Top = 12
        Width = 338
        Height = 14
        Caption = 'Import a Windows Ceritificate Store to a Folder in PEM Format'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 18
        Top = 240
        Width = 26
        Height = 14
        Caption = 'Misc'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object ComboBoxStoreType: TComboBox
        Left = 106
        Top = 90
        Width = 227
        Height = 22
        Hint = 'Select a Windows store type'
        Style = csDropDownList
        ItemHeight = 14
        TabOrder = 0
        Items.Strings = (
          'Certificate Authorities'
          'Root Certificate Authorities'
          'My Own Certificates')
      end
      object DestDirEdit: TEdit
        Left = 106
        Top = 114
        Width = 227
        Height = 22
        Hint = 'Existing destination directory '
        TabOrder = 1
        Text = 'DestDirEdit'
        OnChange = DestDirEditChange
      end
      object CheckBoxWarnDestNotEmpty: TCheckBox
        Left = 106
        Top = 138
        Width = 243
        Height = 17
        Caption = 'Warn me if destination folder is not empty'
        Checked = True
        State = cbChecked
        TabOrder = 2
      end
      object CheckBoxOverwriteExisting: TCheckBox
        Left = 106
        Top = 156
        Width = 243
        Height = 17
        Hint = 
          'If enabled, existing certs with the same name are overwritten.'#13#10 +
          'If not enabled, file extensions are changed. '#13#10'(e.g. 9d66eef0.0,' +
          ' 9d66eef0.1 etc)'
        Caption = 'Overwrite existing files, don'#39't change file ext.'
        TabOrder = 3
      end
      object CheckBoxEmptyDestDir: TCheckBox
        Left = 106
        Top = 174
        Width = 243
        Height = 17
        Hint = 'Warning! - deletes any file in destination folder '
        Caption = 'Empty destination directory'
        TabOrder = 4
      end
      object btnImport: TButton
        Left = 106
        Top = 198
        Width = 229
        Height = 21
        Caption = 'Start import from Windows'
        TabOrder = 5
        OnClick = btnImportClick
      end
      object btnImportPemFile: TButton
        Left = 102
        Top = 258
        Width = 231
        Height = 21
        Caption = 'Import/Hash a PEM Cert File to Destination Dir.'
        TabOrder = 6
        OnClick = btnImportPemFileClick
      end
    end
  end
  object About: TButton
    Left = 448
    Top = 291
    Width = 75
    Height = 21
    Anchors = [akRight, akBottom]
    Caption = '&About'
    TabOrder = 2
    OnClick = AboutClick
  end
  object pmLv: TPopupMenu
    Left = 74
    Top = 188
    object pmShowDetails: TMenuItem
      Caption = 'Show Details'
      OnClick = LvCertsDblClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object pmCopy: TMenuItem
      Caption = 'Copy Certificate'
      OnClick = btnCopyCertClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object pmDelete: TMenuItem
      Caption = 'Delete Certificate'
      OnClick = btnDeleteCertClick
    end
  end
  object ImageList1: TImageList
    Left = 40
    Top = 186
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object OpenDlg: TOpenDialog
    Filter = 'All Files *.*|*.*|PEM Files *.pem|*.pem'
    Left = 40
    Top = 240
  end
  object MainMenu1: TMainMenu
    Left = 254
    Top = 2
    object MMFile: TMenuItem
      Caption = '&File'
      object MMFileExit: TMenuItem
        Caption = '&Exist'
        OnClick = MMFileExitClick
      end
    end
    object MMExtras: TMenuItem
      Caption = '&Extras'
      object MMExtrasCreateSelfSignedCert: TMenuItem
        Caption = 'Create a &self-signed certificate..'
        OnClick = MMExtrasCreateSelfSignedCertClick
      end
      object MMExtrasCreateCertRequest: TMenuItem
        Caption = 'Create a certificate &request..'
        OnClick = MMExtrasCreateCertRequestClick
      end
    end
  end
end
