object FrmAnchor: TFrmAnchor
  Left = 116
  Top = 206
  BorderStyle = bsDialog
  Caption = 'Anchor/Link'
  ClientHeight = 241
  ClientWidth = 510
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  TextHeight = 16
  object lblHRef: TLabel
    Left = 8
    Top = 8
    Width = 25
    Height = 13
    Caption = '&HRef'
    FocusControl = EditHRef
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblTarget: TLabel
    Left = 8
    Top = 40
    Width = 31
    Height = 13
    Caption = '&Target'
    FocusControl = EditTarget
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblName: TLabel
    Left = 8
    Top = 72
    Width = 28
    Height = 13
    Caption = '&Name'
    FocusControl = EditName
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblTitle: TLabel
    Left = 8
    Top = 104
    Width = 20
    Height = 13
    Caption = 'T&itle'
    FocusControl = EditTitle
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblMessageDigest: TLabel
    Left = 8
    Top = 136
    Width = 46
    Height = 26
    Caption = '&Message digest'
    FocusControl = EditMessageDigest
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object lblRev: TLabel
    Left = 208
    Top = 72
    Width = 20
    Height = 13
    Caption = 'Re&v'
    FocusControl = cbRev
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblURN: TLabel
    Left = 208
    Top = 104
    Width = 24
    Height = 13
    Caption = 'U&RN'
    FocusControl = cbURN
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblShape: TLabel
    Left = 208
    Top = 136
    Width = 31
    Height = 13
    Caption = '&Shape'
    FocusControl = cbShape
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblRel: TLabel
    Left = 208
    Top = 40
    Width = 16
    Height = 13
    Caption = 'Re&l'
    FocusControl = cbRel
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object EditHRef: TEdit
    Left = 56
    Top = 8
    Width = 337
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
  end
  object EditTarget: TEdit
    Left = 56
    Top = 40
    Width = 121
    Height = 21
    Hint = 'Browser window to open when this link is clicked'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
  end
  object EditName: TEdit
    Left = 56
    Top = 72
    Width = 121
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object EditTitle: TEdit
    Left = 56
    Top = 104
    Width = 121
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object EditMessageDigest: TEdit
    Left = 56
    Top = 136
    Width = 121
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object cbRel: TComboBox
    Left = 248
    Top = 40
    Width = 145
    Height = 21
    Hint = 'Relationship to the current page'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'Approves'
      'Banner'
      'Bookmark'
      'Contents'
      'Copyright'
      'Embed'
      'Glossary'
      'Help'
      'History'
      'Home'
      'Includes'
      'Index'
      'Interested'
      'Made'
      'Next'
      'Owns'
      'Parent'
      'Precedes'
      'Present'
      'Previous'
      'Refutes'
      'Rel'
      'Reply'
      'Rev'
      'Search'
      'StyleSheet'
      'Subdocument'
      'Supercedes'
      'Supports'
      'ToC'
      'Up'
      'UseGlossary'
      'UseIndex')
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
  end
  object cbRev: TComboBox
    Left = 248
    Top = 72
    Width = 145
    Height = 21
    Hint = 'Reverse of relationship'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'Approves'
      'Banner'
      'Bookmark'
      'Contents'
      'Copyright'
      'Embed'
      'Glossary'
      'Help'
      'History'
      'Home'
      'Includes'
      'Index'
      'Interested'
      'Made'
      'Next'
      'Owns'
      'Parent'
      'Precedes'
      'Present'
      'Previous'
      'Refutes'
      'Rel'
      'Reply'
      'Rev'
      'Search'
      'StyleSheet'
      'Subdocument'
      'Supercedes'
      'Supports'
      'ToC'
      'Up'
      'UseGlossary'
      'UseIndex')
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
  end
  object cbURN: TComboBox
    Left = 248
    Top = 104
    Width = 145
    Height = 21
    Hint = 'Universal resource name'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'URN')
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 8
  end
  object cbShape: TComboBox
    Left = 248
    Top = 136
    Width = 145
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'default'
      'circle x, y, r'
      'polygon x1, y1, x2, y2, ...'
      'rect x, y, w, h')
    ParentFont = False
    ParentShowHint = False
    ShowHint = False
    TabOrder = 9
  end
  object btnCancel: TButton
    Left = 408
    Top = 128
    Width = 89
    Height = 25
    Caption = 'Cancel'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 13
  end
  object btnURL: TBitBtn
    Left = 408
    Top = 7
    Width = 89
    Height = 22
    Hint = 'URL Assistant'
    Caption = '&URL'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = btnURLClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777770000000
      000077777FFFFFFFFFFF7774408777777770777788888888888F7744448BFFFB
      FF707788F78F7FFFFF8F7440008FCCCCCB7078F7778F8888878F6C66368BFFFB
      FF7078F7778F7FFFFF8F6668028FCCCCCB708F77778F8888878F6666388BFFFB
      FF708F77778F7FFFFF8F6866888FCCCCCB708F77778F8888878F6766888BFFFB
      FF708F77778F77FF7F8F8E7E788FFCCF00008F77778F7887888F8777788BFFFB
      7F878F77778F77778F877877778FFBFF787778F7778FFFFF887778F777888888
      807778F7778888888877777FF77778380777778FF777777F877777777777E788
      777777788FFFFF88777777777888887777777777788888777777}
    NumGlyphs = 2
  end
  object btnLink: TButton
    Left = 408
    Top = 96
    Width = 89
    Height = 25
    Hint = 'Use only in the <HEAD> section'
    Caption = '&Link'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 12
    OnClick = btnLinkClick
  end
  object btnAnchor: TBitBtn
    Left = 408
    Top = 64
    Width = 89
    Height = 25
    Hint = 'Use for hypertext links'
    Caption = '&Anchor'
    Default = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 11
    OnClick = btnOKClick
    Glyph.Data = {
      90010000424D9001000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000033
      33333333388888FFF33333380000000083333338888888888F33330003300330
      003333888F388F3888F33803333003333083388F33388F33388F303333300333
      330338F333388F33338F3083333003333803388333388F33388F303333300333
      3303383333388F33338F3333333003333333333333388F33F333333833800333
      03333338FF888FFF8F3333300000000003333338888888888F33333033300333
      83333338F3388F3388333333333003333333333333388F333333333333083033
      333333333388F8F3333333333303303333333333338FF8833333333333300333
      3333333333388F33333333333333333333333333333333333333000000000000
      0000000000000000000000000000000000000000}
    NumGlyphs = 2
  end
  object gbJavaScript: TGroupBox
    Left = 8
    Top = 168
    Width = 393
    Height = 65
    Caption = ' &JavaScript (Anchor only)'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    object lblOnClick: TLabel
      Left = 8
      Top = 20
      Width = 37
      Height = 13
      Caption = 'On&Click'
      FocusControl = EditOnClick
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lblOnFocus: TLabel
      Left = 264
      Top = 20
      Width = 43
      Height = 13
      Caption = 'On&Focus'
      FocusControl = EditOnFocus
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lblOnMouseOver: TLabel
      Left = 136
      Top = 20
      Width = 69
      Height = 13
      Caption = 'OnMouse&Over'
      FocusControl = EditOnMouseOver
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object EditOnMouseOver: TEdit
      Left = 136
      Top = 36
      Width = 121
      Height = 21
      Hint = 
        'enter the method that shall be called when the OnMouseOver event' +
        ' is triggered'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
    end
    object EditOnFocus: TEdit
      Left = 264
      Top = 36
      Width = 121
      Height = 21
      Hint = 
        'enter the method that shall be called when the OnFocus event is ' +
        'triggered'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
    end
    object EditOnClick: TEdit
      Left = 8
      Top = 36
      Width = 121
      Height = 21
      Hint = 
        'enter the method that shall be called when the OnClick event is ' +
        'triggered'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
  end
end