object Form1: TForm1
  Left = 270
  Height = 240
  Top = 168
  Width = 320
  Caption = 'Form1'
  ClientHeight = 240
  ClientWidth = 320
  OnCreate = FormCreate
  LCLVersion = '1.2.4.0'
  object RichMemo1: TRichMemo
    Left = 8
    Height = 186
    Top = 40
    Width = 296
    Anchors = [akTop, akLeft, akRight, akBottom]
    HideSelection = False
    Lines.Strings = (
      'RichMemo1 RichMemo1 '
      'RichMemo1 RichMemo1 '
      'RichMemo1 RichMemo1 '
    )
    OnMouseUp = RichMemo1MouseUp
    TabOrder = 0
    ZoomFactor = 1
  end
  object Button1: TButton
    Left = 8
    Height = 25
    Top = 8
    Width = 96
    Caption = 'Make Link'
    OnClick = Button1Click
    TabOrder = 1
  end
  object Button2: TButton
    Left = 120
    Height = 25
    Top = 8
    Width = 96
    Caption = 'Unlink'
    OnClick = Button2Click
    TabOrder = 2
  end
end