inherited DebugInspector: TDebugInspector Left = 196 Top = 131 Width = 264 Height = 406 BorderStyle = bsSizeToolWin BorderWidth = 1 Caption = 'Debug Inspector' Icon.Data = {} KeyPreview = True PopupMenu = LocalPopupMenu Position = poDefaultPosOnly OnClose = FormClose OnCloseQuery = FormCloseQuery OnMouseDown = FormMouseDown PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 0 Top = 22 Width = 254 Height = 2 Align = alTop Shape = bsSpacer end object StatusBar: TStatusBar Left = 0 Top = 359 Width = 254 Height = 18 Panels = < item Width = 50 end> SimplePanel = True end object TopPanel: TPanel Left = 0 Top = 0 Width = 254 Height = 22 Align = alTop BevelOuter = bvNone BorderStyle = bsSingle Color = clWindow TabOrder = 1 OnResize = TopPanelResize object InstanceLabel: TLabel Left = 0 Top = 0 Width = 233 Height = 18 Align = alClient AutoSize = False ParentColor = False ShowAccelChar = False end object InstanceList: TListButton Left = 233 Top = 0 Width = 17 Height = 18 Align = alRight AutoWidth = False DropAlign = daRight Glyph.Data = { 62010000424D620100000000000042000000280000000C0000000C0000000100 1000030000002001000000000000000000000000000000000000007C0000E003 00001F0000001863186318631863186318631863186318631863186318631863 1863186318631863186318631863186318631863186318631863186318631863 1863186318631863186318631863186318631863186318631863186318631863 1863186318631863186318631863186300001863186318631863186318631863 1863186318630000000000001863186318631863186318631863186300000000 0000000000001863186318631863186318630000000000000000000000000000 1863186318631863186318631863186318631863186318631863186318631863 1863186318631863186318631863186318631863186318631863186318631863 1863186318631863186318631863186318631863186318631863186318631863 186318631863} ItemIndex = -1 ListWidth = 100 MaxListWidth = 0 MinListWidth = 0 Sorted = True OnAccept = InstanceAccept OnCancel = InstanceCancel OnDropDown = InstanceDropDown end end object TabControl: TXTabControl Left = 0 Top = 24 Width = 254 Height = 25 Align = alTop HotTrack = True TabOrder = 2 Tabs.Strings = ( 'Data' 'Methods' 'Properties') TabIndex = 0 OnChange = TabControlClick OnChanging = TabControlChanging BorderStyle = bsNone end object Panel1: TPanel Left = 0 Top = 49 Width = 254 Height = 310 Align = alClient BevelInner = bvLowered BevelOuter = bvNone Caption = 'Panel1' TabOrder = 3 object PropertyPropList: TInspListBox Left = 1 Top = 1 Width = 252 Height = 308 Align = alClient CurIndex = -1 Middle = 123 ShowHint = True TabOrder = 0 OnDblClick = EditDblClick OnEditDblClick = EditDblClick OnGetProperties = PropListGetProperties OnKeyDown = PropListKeyDown OnListButtonClick = PropListButtonClick OnNCHitTest = PropNCHitTest OnQueryButtonClick = PropQueryButtonClick OnSelectItem = SelectItemClick OnUpdateDirtyData = PropListUpdateDirtyData end object MethodPropList: TInspListBox Left = 1 Top = 1 Width = 252 Height = 308 Align = alClient CurIndex = -1 Middle = 123 ShowHint = True TabOrder = 1 OnDblClick = EditDblClick OnEditDblClick = EditDblClick OnGetProperties = PropListGetProperties OnKeyDown = PropListKeyDown OnListButtonClick = PropListButtonClick OnNCHitTest = PropNCHitTest OnSelectItem = SelectItemClick OnUpdateDirtyData = PropListUpdateDirtyData end object DataPropList: TInspListBox Left = 1 Top = 1 Width = 252 Height = 308 Align = alClient CurIndex = -1 Middle = 121 ParentColor = False ShowHint = True TabOrder = 2 OnDblClick = EditDblClick OnEditDblClick = EditDblClick OnGetProperties = PropListGetProperties OnKeyDown = PropListKeyDown OnListButtonClick = PropListButtonClick OnNCHitTest = PropNCHitTest OnSelectItem = SelectItemClick OnUpdateDirtyData = PropListUpdateDirtyData end end object LocalPopupMenu: TPopupMenu OnPopup = LocalPopupMenuPopup Left = 48 Top = 150 object RangeItem: TMenuItem Caption = '&Range...' HelpContext = 5450 OnClick = RangeItemClick end object ChangeItem: TMenuItem Caption = '&Change...' HelpContext = 5451 OnClick = ChangeItemClick end object ShowInheritedItem: TMenuItem Caption = '&Show Inherited' HelpContext = 5452 OnClick = ShowInheritedItemClick end object ShowGetterPropsItem: TMenuItem Caption = '&Show Dynamic Properties' HelpContext = 5457 Visible = False OnClick = ShowGetterPropsItemClick end object N1: TMenuItem Caption = '-' end object LocalInspectItem: TMenuItem Caption = '&Inspect' HelpContext = 5453 OnClick = LocalInspectItemClick end object DescendItem: TMenuItem Caption = '&Descend' HelpContext = 5454 OnClick = DescendItemClick end object N2: TMenuItem Caption = '-' end object NewExpressionItem: TMenuItem Caption = '&New Expression...' HelpContext = 5455 OnClick = NewExpressionItemClick end object TypeCastItem: TMenuItem Caption = '&Type Cast...' HelpContext = 5456 OnClick = TypeCastItemClick end object LocalMenuItem: TMenuItem Caption = 'Local Menu' Visible = False OnClick = LocalMenuItemClick end object ZoomWindowItem: TMenuItem Caption = 'Zoom Window' Visible = False OnClick = ZoomWindowItemClick end object CloseWindowItem: TMenuItem Caption = 'Close Window' Visible = False OnClick = CloseWindowItemClick end object AltInspectItem: TMenuItem Caption = 'AltInspectItem' Visible = False OnClick = LocalInspectItemClick end end end