1object LocalsDlg: TLocalsDlg 2 Left = 359 3 Height = 200 4 Top = 126 5 Width = 500 6 HorzScrollBar.Page = 499 7 VertScrollBar.Page = 199 8 ActiveControl = lvLocals 9 BorderStyle = bsSizeToolWin 10 Caption = 'Locals' 11 ClientHeight = 200 12 ClientWidth = 500 13 LCLVersion = '1.7' 14 object lvLocals: TListView 15 Left = 0 16 Height = 200 17 Top = 0 18 Width = 500 19 Align = alClient 20 Columns = < 21 item 22 Caption = 'Name' 23 Width = 150 24 end 25 item 26 Caption = 'Value' 27 end> 28 MultiSelect = True 29 PopupMenu = PopupMenu1 30 ReadOnly = True 31 RowSelect = True 32 SortType = stText 33 TabOrder = 0 34 ViewStyle = vsReport 35 end 36 object ActionList1: TActionList 37 left = 152 38 top = 80 39 object actInspect: TAction 40 Category = 'main' 41 Caption = 'actInspect' 42 OnExecute = actInspectExecute 43 OnUpdate = actInspectUpdate 44 ShortCut = 16457 45 end 46 object actWath: TAction 47 Category = 'main' 48 Caption = 'actWath' 49 OnExecute = actWathExecute 50 OnUpdate = actInspectUpdate 51 ShortCut = 16471 52 end 53 object actEvaluate: TAction 54 Category = 'main' 55 Caption = 'actEvaluate' 56 OnExecute = actEvaluateExecute 57 OnUpdate = actInspectUpdate 58 ShortCut = 16469 59 end 60 object actCopyName: TAction 61 Category = 'copy' 62 Caption = 'actCopyName' 63 OnExecute = actCopyNameExecute 64 OnUpdate = actInspectUpdate 65 end 66 object actCopyValue: TAction 67 Category = 'copy' 68 Caption = 'actCopyValue' 69 OnExecute = actCopyValueExecute 70 OnUpdate = actInspectUpdate 71 end 72 object actCopyAll: TAction 73 Category = 'copy' 74 Caption = 'actCopyAll' 75 OnExecute = actCopyAllExecute 76 OnUpdate = actCopyAllUpdate 77 end 78 object actCopyRAWValue: TAction 79 Category = 'copy' 80 Caption = 'actCopyRAWValue' 81 OnExecute = actCopyRAWValueExecute 82 OnUpdate = actInspectUpdate 83 end 84 end 85 object PopupMenu1: TPopupMenu 86 left = 38 87 top = 75 88 object MenuItem1: TMenuItem 89 Action = actInspect 90 end 91 object MenuItem2: TMenuItem 92 Action = actWath 93 end 94 object MenuItem3: TMenuItem 95 Action = actEvaluate 96 end 97 object MenuItem4: TMenuItem 98 Caption = '-' 99 end 100 object MenuItem5: TMenuItem 101 Action = actCopyName 102 end 103 object MenuItem6: TMenuItem 104 Action = actCopyValue 105 end 106 object MenuItem8: TMenuItem 107 Action = actCopyRAWValue 108 end 109 object MenuItem7: TMenuItem 110 Action = actCopyAll 111 end 112 end 113end 114