object frmHeading: TfrmHeading
  Left = 256
  Top = 86
  HelpContext = 60
  ActiveControl = OKBtn
  BorderStyle = bsDialog
  Caption = 'Heading'
  ClientHeight = 194
  ClientWidth = 484
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  ShowHint = True
  OnActivate = FormActivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 469
    Height = 149
    Shape = bsFrame
    IsControl = True
  end
  object lblAlign: TLabel
    Left = 15
    Top = 20
    Width = 23
    Height = 13
    Caption = '&Align'
    FocusControl = cmbAlign
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblClear: TLabel
    Left = 215
    Top = 20
    Width = 34
    Height = 13
    Caption = 'C&lear'
    FocusControl = cmbClear
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblSeq_Num: TLabel
    Left = 155
    Top = 132
    Width = 44
    Height = 13
    Caption = 'Seq &Num'
    FocusControl = txtSeqNum
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblSkip: TLabel
    Left = 15
    Top = 132
    Width = 21
    Height = 13
    Caption = 'S&kip'
    FocusControl = txtSkip
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblSrc: TLabel
    Left = 15
    Top = 48
    Width = 16
    Height = 13
    Caption = '&Src'
    FocusControl = cmbURL
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblMessageDigest: TLabel
    Left = 15
    Top = 96
    Width = 46
    Height = 26
    Caption = '&Message Digest'
    FocusControl = txtMD
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object lblDingbat: TLabel
    Left = 15
    Top = 76
    Width = 37
    Height = 13
    Caption = '&Dingbat'
    FocusControl = txtDingbat
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object OKBtn: TBitBtn
    Left = 232
    Top = 164
    Width = 77
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 8
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 316
    Top = 164
    Width = 77
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 9
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 400
    Top = 164
    Width = 77
    Height = 25
    Caption = '&Help'
    TabOrder = 10
    OnClick = HelpBtnClick
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object cmbAlign: TComboBox
    Left = 76
    Top = 16
    Width = 133
    Height = 21
    Hint = 'Alignment of the heading'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'center'
      'justify'
      'left'
      'right')
    ParentFont = False
    Sorted = True
    TabOrder = 0
  end
  object cmbClear: TComboBox
    Left = 256
    Top = 16
    Width = 129
    Height = 21
    Hint = 'Forces the heading to display below any images'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'all'
      'left'
      'right')
    ParentFont = False
    Sorted = True
    TabOrder = 1
  end
  object cmbURL: TComboBox
    Left = 76
    Top = 44
    Width = 309
    Height = 21
    Hint = 'An image to appear preceding the heading'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    Sorted = True
    TabOrder = 2
  end
  object bbtnURL: TBitBtn
    Left = 392
    Top = 40
    Width = 77
    Height = 27
    Hint = 'Open the URL builder'
    Caption = '&URL'
    TabOrder = 11
    OnClick = bbtnURLClick
    Glyph.Data = {
      42010000424D4201000000000000760000002800000012000000110000000100
      040000000000CC00000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777070000007777777777777770000000000000000000007700070000000FFF
      FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
      00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
      7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
      FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
      00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
      777777000000}
  end
  object txtMD: TEdit
    Left = 76
    Top = 100
    Width = 309
    Height = 21
    Hint = 
      'Checksum for the associated graphic specified by the SRC attribu' +
      'te'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object txtDingbat: TEdit
    Left = 76
    Top = 72
    Width = 309
    Height = 21
    Hint = 'An iconic image to appear preceding the heading'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object chkNoWrap: TCheckBox
    Left = 284
    Top = 128
    Width = 97
    Height = 17
    Hint = 'Prevent the heading from wrapping'
    Caption = '&NoWrap'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
  end
  object txtSkip: TEdit
    Left = 76
    Top = 128
    Width = 65
    Height = 21
    Hint = 
      'Increments the sequence number before rendering the element (e.g' +
      '., SKIP=3)'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnKeyPress = txtNumericKeyPress
  end
  object txtSeqNum: TEdit
    Left = 208
    Top = 128
    Width = 65
    Height = 21
    Hint = 'Resets the sequence number of this heading element'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnKeyPress = txtNumericKeyPress
  end
end