frmmainunit.dfm

此为Delphi树控件的一个数据库运用

object frmMain: TfrmMain
  Left = 296
  Top = 217
  Width = 365
  Height = 372
  Caption = 'TreeView Sample'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 189
    Top = 0
    Height = 319
    Align = alRight
  end
  object TreeView1: TTreeView
    Left = 0
    Top = 0
    Width = 189
    Height = 319
    Align = alClient
    DragMode = dmAutomatic
    HideSelection = False
    Images = ImageList1
    Indent = 19
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnChange = TreeView1Change
    OnDragDrop = TreeView1DragDrop
    OnDragOver = TreeView1DragOver
    OnEdited = TreeView1Edited
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 319
    Width = 357
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object Panel1: TPanel
    Left = 192
    Top = 0
    Width = 165
    Height = 319
    Align = alRight
    BevelInner = bvLowered
    BevelOuter = bvNone
    TabOrder = 2
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 163
      Height = 196
      Align = alTop
      TabOrder = 0
      DesignSize = (
        163
        196)
      object Bevel1: TBevel
        Left = 7
        Top = 7
        Width = 149
        Height = 183
        Anchors = [akLeft, akTop, akRight]
        Shape = bsFrame
      end
      object Label2: TLabel
        Left = 37
        Top = 26
        Width = 66
        Height = 12
        Caption = #35831#36755#20837#26631#39064':'
      end
      object btnDelete: TButton
        Left = 36
        Top = 145
        Width = 89
        Height = 25
        Action = acDelete
        TabOrder = 0
      end
      object btnAddChild: TBitBtn
        Left = 36
        Top = 112
        Width = 89
        Height = 25
        Action = acAddChild
        Caption = #28155#21152#23376#33410#28857
        TabOrder = 1
      end
      object btnAdd: TBitBtn
        Left = 36
        Top = 79
        Width = 89
        Height = 25
        Action = acAdd
        Caption = #28155#21152#33410#28857
        TabOrder = 2
      end
      object edtCaption: TEdit
        Left = 36
        Top = 50
        Width = 89
        Height = 20
        TabOrder = 3
        Text = #26032#33410#28857
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 197
      Width = 163
      Height = 121
      Align = alClient
      TabOrder = 1
      object Label1: TLabel
        Left = 14
        Top = 24
        Width = 60
        Height = 12
        Caption = #33410#28857#21517#31216#65306
      end
      object Label3: TLabel
        Left = 14
        Top = 44
        Width = 60
        Height = 12
        Caption = #33410#28857#32534#21495#65306
      end
      object Label4: TLabel
        Left = 2
        Top = 65
        Width = 72
        Height = 12
        Caption = #29238#33410#28857#21517#31216#65306
      end
      object Label5: TLabel
        Left = 2
        Top = 86
        Width = 72
        Height = 12
        Caption = #29238#33410#28857#32534#21495#65306
      end
      object lblNodeCaption: TLabel
        Left = 77
        Top = 24
        Width = 36
        Height = 12
        Caption = #35831#36873#25321
      end
      object lblNodeIndex: TLabel
        Left = 77
        Top = 44
        Width = 36
        Height = 12
        Caption = #35831#36873#25321
      end
      object lblParentCaption: TLabel
        Left = 77
        Top = 65
        Width = 36
        Height = 12
        Caption = #35831#36873#25321
      end
      object lblParentIndex: TLabel
        Left = 77
        Top = 85
        Width = 36
        Height = 12
        Caption = #35831#36873#25321
      end
    end
  end
  object ActionList1: TActionList
    Left = 104
    Top = 132
    object acAdd: TAction
      Caption = #28155#21152#33410#28857
      OnExecute = acAddExecute
    end
    object acAddChild: TAction
      Caption = #28155#21152#23376#33410#28857
      OnExecute = acAddChildExecute
    end
    object acDelete: TAction
      Caption = #21024#38500#33410#28857
      OnExecute = acDeleteExecute
    end
    object acEdit: TAction
      Caption = #32534#36753#33410#28857
      OnExecute = acEditExecute
    end
  end
  object ImageList1: TImageList
    Left = 64
    Top = 132
    Bitmap = {
      494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000001000000001002000000000000010
      0000000000000000000000000000000000000000000000000000000000000000
      000001FC000004F201000BDD030011CC050013C7060011CE05000AE0030004F2
      020001FD00000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000FE000004F2
      020012C2060023800A00634D230079402C00793E2B0054421C002A590B002281
      0B0012C4050004F2020000FE0000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000FE000006EC01002598
      0C00CB626800F6BDB800FBB5B100FDAAA700FEA09F00FD979700EA848400B652
      5200374410001C9D080006ED020000FE00000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000004F500003A8F1500E8B7
      B100F9C8C100F8C5BF00F7CEC600F6D7CE00F6DBD100F6D2C900EFA4A100DF78
      7800C6606000493C180017AA070002F80000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000000000008080000080
      8000008080000080800000808000008080000080800000808000008080000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000DD50500E7BDB600F9C5
      BF00F9C0BA00F9C3BD00F8C6C000F8CAC300F7CDC600F7D1C900F6D4CB00F6D7
      CE00E6ADA700BC5656002A5A0B0009DD0300000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000FFFF00000000000080
      8000008080000080800000808000008080000080800000808000008080000080
      8000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000091744500FABAB500FCAD
      AA00FBB1AD00FBB4B100FAB7B300FABBB600F9BFBA00F9C3BD00F8C6C000F8CA
      C300F7CDC600E2A49F00803A2E0011BD0500000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF000000000000000000000000000000000000000000FFFFFF0000FFFF000000
      0000008080000080800000808000008080000080800000808000008080000080
      8000008080000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000C8858400FE9C9C00FEA0
      9F00FDA3A100FDA6A400FCAAA700FCADAA00FBB0AD00FBB4B000FBB7B300FABB
      B600F9BFBA00F9C3BD00B35555001AA00800000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000FFFF00FFFFFF0000FF
      FF00000000000080800000808000008080000080800000808000008080000080
      8000008080000080800000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000011CC0500D1807D00F9939300FC96
      9600FE989800FF999900FE9C9C00FEA09F00FDA3A100FDA6A400FCAAA700FCAD
      AA00FBB0AD00FBB4B000D4757C001D9A0900000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF000000000000000000000000000000000000000000FFFFFF0000FFFF00FFFF
      FF0000FFFF000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000CC660000CC666400CC666400CC66
      6400CC666400CC666400CC666400CC666400F18B8A00FF999900FE9C9C00FEA0
      9F00FDA3A100FDA6A400D67A800015B20700000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000FFFF00FFFFFF0000FF
      FF00FFFFFF0000FFFF00FFFFFF0000FFFF00FFFFFF0000FFFF00000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000FEC99500FEC99500FEC99500FEC9
      9500FEC99500FEC99500EFA552000BD60200C15C5600F58F8F00F8929200FB95
      9500FE989800FF9999009A5749000DD50500000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF000000000000000000000000000000000000000000FFFFFF0000FFFF00FFFF
      FF0000FFFF00FFFFFF0000FFFF00FFFFFF0000FFFF00FFFFFF00000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C6733A00F3B47500F3B47500F3B4
      7500F3B47500F3B47500F3B475001F7F0700C35E5900EA848400ED878700F08A
      8A00F28C8C00F58F8F001B9D0A0004F50000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000FFFF00FFFFFF0000FF
      FF00000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000508C0E00E89E5400E89E5400E89E
      5400E89E5400E89E5400E89E5400633C120057BD2E00D46E6C00E17B7B00E47E
      7E00E78181005E79270007E8020000FE0000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000084561700DD893400DD89
      3400DD893400DD893400DD893400AA47080003F10000BE595400D6707000D370
      700029AF100006EE020000FE000000000000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000026CD0600A649
      1700D3731400D3731400D3731400CA6A11000CD1020059B42B000BE0040005F2
      020001FC0100000000000000000000000000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00001CD905003BB00A006974120051940E001CD9050000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00F007FFFFFFFF0000C001FFFFFFFF0000
      8000C007001F00008000C007000F00008000C007000700008000C00700030000
      8000C007000100000000C007000000000000C007001F00000000C007001F0000
      0000C007001F00000000C0078FF100008001C00FFFF90000C007C01FFF750000
      F07FC03FFF8F0000FFFFFFFFFFFF000000000000000000000000000000000000
      000000000000}
  end
  object PopupMenu1: TPopupMenu
    Left = 100
    Top = 64
    object N1: TMenuItem
      Action = acAdd
    end
    object N2: TMenuItem
      Action = acAddChild
    end
    object N4: TMenuItem
      Action = acEdit
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Action = acDelete
    end
  end
end