Chip 2004 April/CMCD0404.ISO/Software/Shareware/Comunicatii/thebat/the_bat2.04.07.exe/thebat.exe/0/RCDATA/TPGPKEYSFORM/TPGPKEYSFORM.txt

Text File | 2004-02-23 | 6.1 KB | 270 lines

object PGPkeysForm: TPGPkeysForm
  Left = 133
  Top = 75
  Width = 581
  Height = 368
  Caption = 'OpenPGP Key Manager'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Menu = MainMenu
  OldCreateOrder = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object ListBox: TListBox
    Left = 0
    Top = 20
    Width = 573
    Height = 302
    Style = lbOwnerDrawFixed
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    MultiSelect = True
    ParentFont = False
    PopupMenu = ListPopup
    TabOrder = 0
    OnClick = ListBoxClick
    OnDblClick = ListBoxDblClick
    OnDrawItem = ListBoxDrawItem
    OnKeyDown = ListBoxKeyDown
    OnMouseDown = ListBoxMouseDown
  end
  object Header: THeaderControl
    Left = 0
    Top = 0
    Width = 573
    Height = 20
    Sections = <
      item
        ImageIndex = -1
        MinWidth = 40
        Text = 'Keys'
        Width = 300
      end
      item
        Alignment = taCenter
        ImageIndex = -1
        Text = 'Validity'
        Width = 50
      end
      item
        Alignment = taCenter
        ImageIndex = -1
        Text = 'Trust'
        Width = 60
      end
      item
        Alignment = taRightJustify
        ImageIndex = -1
        Text = 'Size'
        Width = 50
      end
      item
        ImageIndex = -1
        MaxWidth = 2000
        MinWidth = 2000
        Text = 'Description'
        Width = 2000
      end>
    OnSectionResize = HeaderSectionResize
  end
  object MainMenu: TMainMenu
    Left = 56
    Top = 56
    object mEdit: TMenuItem
      Caption = '&Edit'
      ShortCut = 16430
      object meCopy: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
        OnClick = pCopyClick
      end
      object mePaste: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = mePasteClick
      end
      object meDelete: TMenuItem
        Caption = '&Delete'
        ShortCut = 16430
        OnClick = pDeleteClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object meSelectAll: TMenuItem
        Caption = 'Select &All'
        ShortCut = 16449
        OnClick = meSelectAllClick
      end
      object meCollapse: TMenuItem
        Caption = 'Co&llapse Selection'
        OnClick = meCollapseClick
      end
      object meExpand: TMenuItem
        Caption = 'E&xpand Selection'
        OnClick = meExpandClick
      end
    end
    object Keys1: TMenuItem
      Caption = '&Keys'
      object mkSign: TMenuItem
        Caption = 'Sign...'
        ShortCut = 16467
        OnClick = pSignClick
      end
      object mkSetDefaultKey: TMenuItem
        Caption = 'Set as Default Key'
        ShortCut = 32836
        OnClick = pSetasDefaultClick
      end
      object mkAddName: TMenuItem
        Caption = 'Add Name...'
        ShortCut = 32833
        OnClick = pAddNameClick
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object mkNewKey: TMenuItem
        Caption = '&New Key...'
        ShortCut = 16462
        OnClick = mkNewKeyClick
      end
      object mkEnable: TMenuItem
        Caption = '&Enable'
        ShortCut = 16453
        OnClick = pEnableClick
      end
      object mkDisable: TMenuItem
        Caption = '&Disable'
        ShortCut = 16452
        OnClick = pDisableClick
      end
      object mkRevoke: TMenuItem
        Caption = '&Revoke...'
        ShortCut = 16466
        OnClick = mkRevokeClick
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object mkImport: TMenuItem
        Caption = 'I&mport...'
        ShortCut = 113
        OnClick = mkImportClick
      end
      object mkExport: TMenuItem
        Caption = 'E&xport...'
        ShortCut = 114
        OnClick = pExportClick
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object mkKeyProperties: TMenuItem
        Caption = 'Key P&roperties...'
        ShortCut = 13
        OnClick = mkKeyPropertiesClick
      end
    end
  end
  object ListPopup: TPopupMenu
    Left = 104
    Top = 56
    object pCopy: TMenuItem
      Caption = '&Copy'
      OnClick = pCopyClick
    end
    object kCopy: TMenuItem
      Caption = '&Copy'
      ShortCut = 16429
      Visible = False
      OnClick = pCopyClick
    end
    object pPaste: TMenuItem
      Caption = '&Paste'
      OnClick = mePasteClick
    end
    object kPaste: TMenuItem
      Caption = '&Paste'
      ShortCut = 8237
      Visible = False
      OnClick = mePasteClick
    end
    object pDelete: TMenuItem
      Caption = '&Delete'
      OnClick = pDeleteClick
    end
    object pkDelete: TMenuItem
      Caption = '&Delete'
      ShortCut = 16430
      Visible = False
      OnClick = pDeleteClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object pSign: TMenuItem
      Caption = '&Sign...'
      OnClick = pSignClick
    end
    object pEnable: TMenuItem
      Caption = '&Enable'
      OnClick = pEnableClick
    end
    object pDisable: TMenuItem
      Caption = 'D&isable'
      OnClick = pDisableClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object pAddName: TMenuItem
      Caption = 'Add &Name...'
      OnClick = pAddNameClick
    end
    object pRevoke: TMenuItem
      Caption = '&Revoke...'
      OnClick = mkRevokeClick
    end
    object pSetasDefault: TMenuItem
      Caption = 'Se&t as Default'
      OnClick = pSetasDefaultClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object pImport: TMenuItem
      Caption = 'Import...'
      OnClick = mkImportClick
    end
    object pExport: TMenuItem
      Caption = 'Export...'
      OnClick = pExportClick
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object pProperties: TMenuItem
      Caption = 'Key Properties'
      OnClick = mkKeyPropertiesClick
    end
  end
end