object FormTargetCode: TFormTargetCode
  Left = 682
  Height = 240
  Top = 485
  Width = 320
  Caption = 'Target code'
  ClientHeight = 240
  ClientWidth = 320
  DesignTimePPI = 120
  LCLVersion = '1.8.2.0'
  object MemoTarget: TMemo
    Left = 0
    Height = 240
    Top = 0
    Width = 320
    Align = alClient
    Font.Name = 'Courier New'
    ParentFont = False
    PopupMenu = PopupMenuTarget
    ReadOnly = True
    ScrollBars = ssAutoBoth
    TabOrder = 0
  end
  object PopupMenuTarget: TPopupMenu
    Images = Core.ImageListMain
    left = 84
    top = 100
    object MenuItem20: TMenuItem
      Action = AFormatCode
    end
    object MenuItem1: TMenuItem
      Action = AShrinkCode
    end
  end
  object ActionList1: TActionList
    Images = Core.ImageListMain
    left = 199
    top = 39
    object AFormatCode: TAction
      Caption = 'Format code'
      OnExecute = AFormatCodeExecute
    end
    object AShrinkCode: TAction
      Caption = 'Shrink code'
      OnExecute = AShrinkCodeExecute
    end
  end
end