dict.dfm

从文档管理升华到知识管理文档是知识的容器

object DictForm: TDictForm
  Left = 227
  Top = 190
  Width = 696
  Height = 480
  Caption = #25968#25454#32500#25252#24037#20855
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 33
    Align = alTop
    TabOrder = 0
    object DBNavigator1: TDBNavigator
      Left = 1
      Top = 1
      Width = 686
      Height = 31
      DataSource = DataSource1
      Align = alClient
      TabOrder = 0
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 33
    Width = 688
    Height = 417
    Align = alClient
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 686
      Height = 415
      Align = alClient
      DataSource = DataSource1
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'id'
          Title.Caption = #23618#27425#21495
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'name'
          Title.Caption = #25991#26723#21517#31216
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'path1'
          Title.Caption = #25991#26723#36335#24452
          Width = 250
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'parentId'
          Title.Caption = #25991#26723#29238#39033#21495
          Width = 70
          Visible = True
        end>
    end
  end
  object ADOQuery1: TADOQuery
    Connection = WdForm.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from table2')
    Left = 40
    Top = 120
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 128
    Top = 120
  end
end