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