PC World Plus! (NZ) 2001 June/HDC50.iso/Runimage/Delphi50/Bin/CORIDE50.BPL/0/RCDATA/TPROPERTYINSPECTOR/TPROPERTYINSPECTOR.txt

Text File | 1999-08-11 | 7KB | 278 lines

inherited PropertyInspector: TPropertyInspector
  Tag = 68
  Left = 205
  Top = 197
  Width = 190
  Height = 309
  HorzScrollBar.Increment = 16
  VertScrollBar.Increment = 25
  BorderWidth = 1
  Caption = 'Object Inspector'
  ParentFont = False
  Icon.Data = {<image000.ico>}
  PopupMenu = LocalPopupMenu
  OnActivate = PropertyInspectorActivate
  OnDeactivate = FormDeactivate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 0
    Top = 22
    Width = 180
    Height = 2
    Align = alTop
    AutoSize = False
  end
  object Panel1: TPanel [1]
    Left = 0
    Top = 0
    Width = 180
    Height = 22
    Align = alTop
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Color = clWindow
    FullRepaint = False
    TabOrder = 0
    OnResize = Panel1Resize
    object PaintBox1: TPaintBox
      Left = 0
      Top = 0
      Width = 159
      Height = 18
      Align = alClient
      ParentColor = False
      OnMouseDown = PaintBox1MouseDown
      OnPaint = PaintBox1Paint
    end
    object InstanceList: TListButton
      Left = 159
      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
      Style = lbStandard
    end
  end
  object Panel2: TPanel [2]
    Left = 0
    Top = 49
    Width = 180
    Height = 212
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvNone
    FullRepaint = False
    TabOrder = 1
    object PropList: TInspListBox
      Left = 1
      Top = 1
      Width = 178
      Height = 210
      Align = alClient
      CurIndex = -1
      Middle = 85
      ReadOnly = False
      ShowHint = True
      TabOrder = 0
      OnEditDblClick = PropListEditDblClick
      OnGetProperties = PropListGetProperties
      OnHelp = PropListHelp
      OnKeyDown = PropListKeyDown
      OnSelectItem = PropListSelectItem
    end
  end
  object Panel3: TPanel [3]
    Left = 0
    Top = 24
    Width = 180
    Height = 25
    Align = alTop
    BevelOuter = bvNone
    FullRepaint = False
    TabOrder = 2
    object TabControl: TXTabControl
      Left = 0
      Top = 0
      Width = 180
      Height = 25
      Align = alClient
      HotTrack = True
      TabOrder = 0
      Tabs.Strings = (
        'Properties'
        'Events')
      TabIndex = 0
      TabStop = False
      OnChange = TabChange
      OnResize = TabControlResize
      BorderStyle = bsNone
    end
  end
  object StatusBar: TStatusBar [4]
    Left = 0
    Top = 261
    Width = 180
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  inherited DockActionList: TActionList
    Left = 40
    Top = 56
  end
  object LocalPopupMenu: TPopupMenu
    HelpContext = 4735
    Images = ImageList1
    OnPopup = LocalPopupMenuPopup
    Left = 40
    Top = 112
    object dNextPage: TMenuItem
      Caption = 'Next Page'
      Visible = False
      OnClick = dNextPageClick
    end
    object dPrevPage: TMenuItem
      Caption = 'Previous Page'
      Visible = False
      OnClick = dNextPageClick
    end
    object dNextPageAlt: TMenuItem
      Caption = 'Next page alt'
      Visible = False
      OnClick = dNextPageClick
    end
    object dPrevPageAlt: TMenuItem
      Caption = 'Previous page alt'
      Visible = False
      OnClick = dNextPageClick
    end
    object LocalMenuItem: TMenuItem
      Caption = 'Local Menu'
      Visible = False
      OnClick = LocalMenuItemClick
    end
    object ViewWhat: TMenuItem
      Caption = '&View'
      OnClick = ViewWhatClick
      object ViewBar: TMenuItem
        Caption = '-'
      end
      object ViewAll: TMenuItem
        Action = ViewAllCmd
      end
      object ViewToggle: TMenuItem
        Caption = 'Toggle'
        OnClick = ViewToggleClick
      end
      object ViewNone: TMenuItem
        Action = ViewNoneCmd
      end
    end
    object ArrangeWhat: TMenuItem
      Caption = '&Arrange'
      object ArrangeByCategory: TMenuItem
        Action = ArrangeByCategoryCmd
        RadioItem = True
      end
      object ArrangeByName: TMenuItem
        Action = ArrangeByNameCmd
        RadioItem = True
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Revert: TMenuItem
      Caption = '&Revert to inherited'
      OnClick = RevertClick
    end
    object Expand: TMenuItem
      Caption = 'E&xpand'
      HelpContext = 2378
      OnClick = ExpandClick
    end
    object Collapse: TMenuItem
      Caption = '&Collapse'
      HelpContext = 2379
      OnClick = CollapseClick
    end
    object Stayontop: TMenuItem
      Action = StayOnTopCmd
    end
    object ShowStatusbar: TMenuItem
      Caption = 'S&tatus bar'
      OnClick = ShowStatusbarClick
    end
    object Hide1: TMenuItem
      Caption = '&Hide'
      HelpContext = 2376
      OnClick = Hide1Click
    end
    object Help1: TMenuItem
      Caption = 'H&elp'
      HelpContext = 2377
      OnClick = Help1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object DockableItem: TMenuItem
      Action = DockableCmd
    end
  end
  object CategoryActions: TActionList
    Left = 120
    Top = 56
    object ArrangeByCategoryCmd: TAction
      Category = 'Arrange'
      Caption = 'by &Category'
      OnExecute = ArrangeByCategoryCmdExecute
      OnUpdate = ArrangeByCategoryCmdUpdate
    end
    object ArrangeByNameCmd: TAction
      Category = 'Arrange'
      Caption = 'by &Name'
      OnExecute = ArrangeByNameCmdExecute
      OnUpdate = ArrangeByNameCmdUpdate
    end
    object ViewAllCmd: TAction
      Category = 'View'
      Caption = 'All'
      OnExecute = ViewAllCmdExecute
    end
    object ViewNoneCmd: TAction
      Category = 'View'
      Caption = 'None'
      OnExecute = ViewNoneCmdExecute
    end
  end
  object ImageList1: TImageList
    Left = 120
    Top = 113
  end
end