object FormDisassembler: TFormDisassembler
  Left = 485
  Height = 746
  Top = 359
  Width = 1056
  Caption = 'Disassembler'
  ClientHeight = 746
  ClientWidth = 1056
  DesignTimePPI = 144
  LCLVersion = '4.6.0.0'
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  object ListView1: TListView
    Left = 0
    Height = 746
    Top = 0
    Width = 1056
    Align = alClient
    Columns = <    
      item
        Caption = 'Address'
        Width = 100
      end    
      item
        Caption = 'Opcode'
        Width = 150
      end    
      item
        Caption = 'Instruction'
        Width = 100
      end    
      item
        Caption = 'Parameters'
        Width = 100
      end    
      item
        Caption = 'Comment'
        Width = 591
      end>
    OwnerData = True
    PopupMenu = PopupMenu1
    ReadOnly = True
    RowSelect = True
    TabOrder = 0
    ViewStyle = vsReport
    OnData = ListView1Data
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 440
    Top = 352
    object MenuItemSetAddress: TMenuItem
      Caption = 'Set PC to address'
      OnClick = MenuItemSetAddressClick
    end
    object MenuItemAddBreakPoint: TMenuItem
      Caption = 'Add break point'
      OnClick = MenuItemAddBreakPointClick
    end
    object MenuItemRemoveBreakPoint: TMenuItem
      Caption = 'Remove break point'
      OnClick = MenuItemRemoveBreakPointClick
    end
  end
  object Timer1: TTimer
    Interval = 50
    OnTimer = Timer1Timer
    Left = 568
    Top = 352
  end
end