object WatchesDlg: TWatchesDlg
  Left = 359
  Top = 126
  Width = 500
  Height = 200
  Caption = 'Watch list'
  object lvWatches: TListView
    Left = 0
    Top = 0
    Width = 484
    Height = 200
    Align = alClient
    Columns = <
      item
        Caption = 'Expression'
        Width = 150
      end
      item
        Caption = 'Value'
        Width = 400
      end>
    PopupMenu = mnuPopup
    MultiSelect = True
    ViewStyle = vsReport
    OnClick = lvWatchesClick
    OnSelectItem = lvWatchesSelectItem
  end
  object mnuPopup: TPopupMenu
    Left = 100
    Top = 96
    object popAdd: TMenuItem
      Caption = '&Add'
      OnClick = popAddClick 
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object popProperties: TMenuItem
      Caption = '&Properties'
      OnClick = popPropertiesClick 
    end
    object popEnabled: TMenuItem
      Caption = '&Enabled'
      OnClick = popEnabledClick 
    end
    object popDelete: TMenuItem
      Caption = '&Delete'
      OnClick = popDeleteClick 
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object popDisableAll: TMenuItem
      Caption = 'D&isable All'
      OnClick = popDisableAllClick 
    end
    object popEnableAll: TMenuItem
      Caption = 'E&nable All'
      OnClick = popEnableAllClick 
    end
    object popDeleteAll: TMenuItem
      Caption = 'De&lete All'
      OnClick = popDeleteAllClick 
    end
  end
end 
