PageRenderTime 14ms CodeModel.GetById 8ms app.highlight 3ms RepoModel.GetById 1ms app.codeStats 0ms

/debugger/registersdlg.lfm

http://github.com/graemeg/lazarus
Unknown | 172 lines | 172 code | 0 blank | 0 comment | 0 complexity | 0977b11e1a2b1f3d79ce63a49be76a78 MD5 | raw file
  1inherited RegistersDlg: TRegistersDlg
  2  Left = 342
  3  Height = 253
  4  Top = 117
  5  Width = 346
  6  ActiveControl = lvRegisters
  7  BorderStyle = bsSizeToolWin
  8  Caption = 'Registers'
  9  ClientHeight = 253
 10  ClientWidth = 346
 11  object lvRegisters: TListView[0]
 12    Left = 0
 13    Height = 227
 14    Top = 26
 15    Width = 346
 16    Align = alClient
 17    Columns = <    
 18      item
 19        Caption = 'Name'
 20        Width = 150
 21      end    
 22      item
 23        Caption = 'Value'
 24      end>
 25    MultiSelect = True
 26    PopupMenu = PopupMenu1
 27    RowSelect = True
 28    SmallImages = ImageList1
 29    SortType = stText
 30    TabOrder = 0
 31    ViewStyle = vsReport
 32    OnSelectItem = lvRegistersSelectItem
 33  end
 34  object ToolBar1: TToolBar[1]
 35    Left = 0
 36    Height = 26
 37    Top = 0
 38    Width = 346
 39    Caption = 'ToolBar1'
 40    ShowCaptions = True
 41    TabOrder = 1
 42    object ToolButtonPower: TToolButton
 43      Left = 1
 44      Top = 2
 45      Action = actPower
 46      Down = True
 47      ParentShowHint = False
 48      ShowCaption = False
 49      ShowHint = True
 50      Style = tbsCheck
 51    end
 52    object ToolButton1: TToolButton
 53      Left = 24
 54      Top = 2
 55      Width = 10
 56      Caption = 'ToolButton1'
 57      Style = tbsSeparator
 58    end
 59    object ToolButtonDispType: TToolButton
 60      Left = 34
 61      Top = 2
 62      Caption = '...'
 63      DropdownMenu = PopupDispType
 64      OnClick = ToolButtonDispTypeClick
 65      ParentShowHint = False
 66      ShowHint = True
 67      Style = tbsDropDown
 68    end
 69  end
 70  object ImageList1: TImageList[2]
 71    Height = 8
 72    Width = 8
 73    left = 112
 74    top = 93
 75    Bitmap = {
 76      4C69010000000800000008000000000000000000000000000000000000000000
 77      000000000000000000000000000000000000000000005CDD8AFF33D56FFF65DE
 78      8FFF000000000000000000000000000000004FD374FF15C649FF17C64BFF14C6
 79      49FF4FCD72FF00000000000000000000000019B73CFF0CB330FF0CB331FF0CB3
 80      30FF15B038FF0000000000000000000000004EBC5DFF03A01AFF04A11CFF03A0
 81      19FF50B95FFF000000000000000000000000000000004BB257FF169D27FF56B5
 82      5FFF000000000000000000000000000000000000000000000000000000000000
 83      0000000000000000000000000000000000000000000000000000000000000000
 84      0000000000000000000000000000
 85    }
 86  end
 87  object ActionList1: TActionList[3]
 88    left = 200
 89    top = 112
 90    object actPower: TAction
 91      OnExecute = actPowerExecute
 92    end
 93    object actCopyName: TAction
 94      Category = 'copy'
 95      Caption = 'actCopyName'
 96      OnExecute = actCopyNameExecute
 97    end
 98    object actCopyValue: TAction
 99      Category = 'copy'
100      Caption = 'actCopyValue'
101      OnExecute = actCopyValueExecute
102    end
103  end
104  object PopupDispType: TPopupMenu[4]
105    left = 200
106    top = 176
107    object DispDefault: TMenuItem
108      Caption = 'New Item1'
109      OnClick = DispDefaultClick
110    end
111    object DispHex: TMenuItem
112      Caption = 'New Item2'
113      OnClick = DispDefaultClick
114    end
115    object DispBin: TMenuItem
116      Caption = 'New Item3'
117      OnClick = DispDefaultClick
118    end
119    object DispOct: TMenuItem
120      Caption = 'New Item4'
121      OnClick = DispDefaultClick
122    end
123    object DispDec: TMenuItem
124      Caption = 'New Item5'
125      OnClick = DispDefaultClick
126    end
127    object DispRaw: TMenuItem
128      Caption = 'New Item6'
129      OnClick = DispDefaultClick
130    end
131  end
132  object PopupMenu1: TPopupMenu[5]
133    left = 95
134    top = 178
135    object popFormat: TMenuItem
136      Caption = 'New Item1'
137      object PopDispDefault: TMenuItem
138        Caption = 'New Item1'
139        OnClick = DispDefaultClick
140      end
141      object PopDispHex: TMenuItem
142        Caption = 'New Item2'
143        OnClick = DispDefaultClick
144      end
145      object PopDispBin: TMenuItem
146        Caption = 'New Item3'
147        OnClick = DispDefaultClick
148      end
149      object PopDispOct: TMenuItem
150        Caption = 'New Item4'
151        OnClick = DispDefaultClick
152      end
153      object PopDispDec: TMenuItem
154        Caption = 'New Item5'
155        OnClick = DispDefaultClick
156      end
157      object PopDispRaw: TMenuItem
158        Caption = 'New Item6'
159        OnClick = DispDefaultClick
160      end
161    end
162    object popL1: TMenuItem
163      Caption = '-'
164    end
165    object popCopyName: TMenuItem
166      Action = actCopyName
167    end
168    object popCopyValue: TMenuItem
169      Action = actCopyValue
170    end
171  end
172end