details.dfm

一个很不错的系统信息控件

        TabOrder = 1
        OnClick = ModListDblClick
      end
    end
    object TabSheet5: TTabSheet
      Caption = 'Threads'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImageIndex = 4
      ParentFont = False
      object ThdList: TListView
        Left = 12
        Top = 12
        Width = 417
        Height = 355
        Anchors = [akLeft, akTop, akRight, akBottom]
        Columns = <
          item
            Caption = 'ID'
          end
          item
            Caption = 'Start Address'
            Width = 80
          end
          item
            Alignment = taRightJustify
            Caption = 'Base Pri'
            Width = 55
          end
          item
            Alignment = taRightJustify
            Caption = 'Dyn Pri'
          end
          item
            Caption = 'State'
            Width = 100
          end
          item
            Alignment = taRightJustify
            Caption = 'CntxSwitch Cnt'
            Width = 85
          end
          item
            Caption = 'Kernel Time'
            Width = 70
          end
          item
            Caption = 'User Time'
            Width = 70
          end>
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        ViewStyle = vsReport
        OnAdvancedCustomDrawItem = ListAdvancedCustomDrawItem
        OnAdvancedCustomDrawSubItem = ListAdvancedCustomDrawSubItem
        OnColumnClick = ListColumnClick
        OnCompare = ListCompare
      end
    end
    object TabSheet4: TTabSheet
      Caption = ' Performance '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImageIndex = 3
      ParentFont = False
      object CntList: TListView
        Left = 12
        Top = 12
        Width = 417
        Height = 355
        Anchors = [akLeft, akTop, akRight, akBottom]
        Color = clBtnFace
        Columns = <
          item
            Caption = 'Name'
            Width = 200
          end
          item
            Alignment = taRightJustify
            Caption = 'Current'
            Width = 100
          end
          item
            Alignment = taRightJustify
            Caption = 'Peak'
            Width = 100
          end>
        ColumnClick = False
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        ViewStyle = vsReport
        OnAdvancedCustomDrawItem = GenListAdvancedCustomDrawItem
        OnAdvancedCustomDrawSubItem = GenListAdvancedCustomDrawSubItem
      end
    end
    object TabSheet6: TTabSheet
      Caption = ' Handles '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImageIndex = 5
      ParentFont = False
      object HList: TListView
        Left = 12
        Top = 12
        Width = 417
        Height = 355
        Anchors = [akLeft, akTop, akRight, akBottom]
        Columns = <
          item
            Caption = 'Handle'
          end
          item
            Caption = 'Type'
            Width = 75
          end
          item
            Caption = 'Access'
            Width = 80
          end
          item
            Caption = 'Name'
            Width = 185
          end>
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        ViewStyle = vsReport
        OnAdvancedCustomDrawItem = ListAdvancedCustomDrawItem
        OnAdvancedCustomDrawSubItem = ListAdvancedCustomDrawSubItem
        OnColumnClick = ListColumnClick
        OnCompare = ListCompare
      end
    end
    object TabSheet7: TTabSheet
      Caption = ' Windows '
      ImageIndex = 6
      object WinTree: TTreeView
        Left = 11
        Top = 11
        Width = 417
        Height = 314
        Anchors = [akLeft, akTop, akRight, akBottom]
        Images = ImageList
        Indent = 19
        ReadOnly = True
        TabOrder = 0
        OnDeletion = WinTreeDeletion
      end
      object Button5: TButton
        Left = 353
        Top = 340
        Width = 75
        Height = 25
        Cursor = crHandPoint
        Anchors = [akRight, akBottom]
        Caption = 'Properties...'
        TabOrder = 1
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Child Processes'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImageIndex = 2
      ParentFont = False
      object CPList: TListView
        Left = 12
        Top = 12
        Width = 417
        Height = 314
        Anchors = [akLeft, akTop, akRight, akBottom]
        Columns = <
          item
            Caption = 'PID'
            Width = 125
          end
          item
            Caption = 'Name'
            Width = 270
          end>
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        ViewStyle = vsReport
        OnAdvancedCustomDrawItem = ListAdvancedCustomDrawItem
        OnAdvancedCustomDrawSubItem = ListAdvancedCustomDrawSubItem
        OnColumnClick = ListColumnClick
        OnCompare = ListCompare
        OnDblClick = CPListDblClick
      end
      object Button1: TButton
        Left = 329
        Top = 340
        Width = 100
        Height = 25
        Cursor = crHandPoint
        Anchors = [akRight, akBottom]
        Caption = 'Go to process'
        TabOrder = 1
        OnClick = CPListDblClick
      end
    end
  end
  object bRefresh: TButton
    Left = 12
    Top = 489
    Width = 75
    Height = 25
    Cursor = crHandPoint
    Anchors = [akLeft, akBottom]
    Caption = 'Refresh'
    TabOrder = 2
    OnClick = bRefreshClick
  end
  object ImageList: TImageList
    Left = 48
    Top = 419
    Bitmap = {
      494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000001000000001001000000000000008
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E734E734E734E734E734E
      734E734E734E734E734E734E734E734E00000000DF00DF00DF00DF00DF00DF00
      DF00DF00DF00DF00DF00DF00DF00DF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E0000734E0000734E734E
      0000734E734E0000734E734E0000734E00000000DF00FF7F734EFF7F734E734E
      FF7F734E734EFF7F734E734EFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E0000734E0000734E734E
      0000734E734E0000734E734E0000734E00000000DF00FF7F734EFF7F734E734E
      FF7F734E734EFF7F734E734EFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E0000734E734E734E734E
      734E734E734E734E734E734E0000734E00000000DF00FF7F7932793279327932
      793279327932793279327932FF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E000000000000734E734E
      0000734E734E0000734E734E0000734E00000000DF00FF7FFF7FFF7F734E734E
      FF7F734E734EFF7F734E734EFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E00000000000000000000
      0000000000000000000000000000734E00000000DF00FF7FFF7FFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FDF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E734E734E734E734E734E
      734E734E734E734E734E734E734E734E00000000DF00DF00DF00DF00DF00DF00
      DF00DF00DF00DF00DF00DF00DF00DF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000734E734E734E734E734E734E
      734E734E734E734E734E734E734E734E00000000DF00DF00DF00DF00DF00DF00
      DF00DF00DF00DF00DF00DF00DF00DF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000003967734E734E734E734E734E
      734E734E734E734E734E734E734E3967000000003F4FDF00DF00DF00DF00DF00
      DF00DF00DF00DF00DF00DF00DF003F4F00000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00FFFFFFFF000000008001800100000000
      BFFD800100000000A925800100000000BFFD800100000000A925800100000000
      BFFD800100000000A005800100000000BFFD800100000000B925800100000000
      BFFD800100000000BFFD80010000000080018001000000008001800100000000
      8001800100000000FFFFFFFF0000000000000000000000000000000000000000
      000000000000}
  end
end