sprk.~dfm

汽车配件管理系统 采用ACCESS数据库 配件销售类公司适用 。 主要是目录树的学习

          Properties.ListSource = DataSource5
        end>
      ParentFont = False
      TabOrder = 0
      TabStop = True
    end
    object cxButton1: TcxButton
      Left = 56
      Top = 200
      Width = 163
      Height = 25
      Caption = #25353#24403#21069#20998#31867#19982#19978#36848#26465#20214#26597#35810
      TabOrder = 1
      OnClick = cxButton1Click
    end
  end
  object DBGridEh2: TDBGridEh
    Left = 296
    Top = 328
    Width = 465
    Height = 185
    AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
    DataSource = DataSource4
    Enabled = False
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    FooterRowCount = 1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    PopupMenu = PopupMenu2
    SumList.Active = True
    SumList.VirtualRecords = True
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        EditButtons = <>
        FieldName = 'sjmc'
        Footers = <
          item
            DisplayFormat = #21512#35745
            FieldName = 'sjmc'
            Value = #21512#35745
            ValueType = fvtCount
          end>
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #21830#21697#21517#31216
        Width = 90
      end
      item
        EditButtons = <>
        FieldName = 'spmc'
        Footers = <
          item
            FieldName = 'spmc'
            ValueType = fvtCount
          end>
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #21378#23478#35268#26684
        Width = 98
      end
      item
        EditButtons = <>
        FieldName = 'dw'
        Footers = <>
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #21333#20301
        Width = 30
      end
      item
        EditButtons = <>
        FieldName = 'jj'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #36827#20215
        Width = 50
      end
      item
        EditButtons = <>
        FieldName = 'sj'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21806#20215
        Width = 50
      end
      item
        EditButtons = <>
        FieldName = 'sl'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25968#37327
        Width = 40
      end
      item
        EditButtons = <>
        FieldName = 'je'
        Footers = <
          item
            DisplayFormat = '0.00'
            FieldName = 'je'
            Value = '0'
            ValueType = fvtSum
          end>
        Title.Alignment = taCenter
        Title.Caption = #37329#39069
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'pfj'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25209#21457#20215
        Width = 50
      end>
  end
  object ePanel2: TbsSkinExPanel
    Left = 0
    Top = 272
    Width = 289
    Height = 249
    TabOrder = 0
    SkinDataName = 'expanel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    NumGlyphs = 1
    Spacing = 2
    RealWidth = 0
    RealHeight = 0
    ShowRollButton = True
    ShowCloseButton = False
    DefaultCaptionHeight = 21
    RollState = False
    RollKind = rkRollVertical
    Caption = '                                  '#20379#36135#21830#36164#26009
    object cxLabel2: TcxLabel
      Left = 8
      Top = 32
      Width = 52
      Height = 17
      Caption = #20379#36135#21830#65306
    end
    object rBox1: TcxCheckBox
      Left = 216
      Top = 32
      Width = 65
      Height = 21
      Caption = #21161#35760#30721
      TabOrder = 2
      OnClick = rBox1Click
    end
    object Edit1: TcxTextEdit
      Left = 56
      Top = 32
      Width = 161
      Height = 21
      Properties.OnChange = Edit1PropertiesChange
      TabOrder = 0
    end
    object DBGridEh3: TDBGridEh
      Left = 8
      Top = 56
      Width = 265
      Height = 185
      Hint = #21452#20987#36873#25321#20379#36135#21830
      DataSource = DataSource6
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DBGridEh3DblClick
      Columns = <
        item
          EditButtons = <>
          FieldName = 'khmc'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #20379#36135#21830#21517#31216
          Width = 170
        end
        item
          EditButtons = <>
          FieldName = 'lxr'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #32852#31995#20154
          Width = 50
        end>
    end
  end
  object ePanel5: TbsSkinExPanel
    Left = 584
    Top = 8
    Width = 169
    Height = 241
    TabOrder = 9
    SkinDataName = 'expanel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    NumGlyphs = 1
    Spacing = 2
    RealWidth = 0
    RealHeight = 0
    ShowRollButton = True
    ShowCloseButton = False
    DefaultCaptionHeight = 21
    RollState = False
    RollKind = rkRollVertical
    Caption = '       '#20837#24211#21333#25171#21360#23383#27573#35774#32622
    object sBox1: TcxCheckBox
      Left = 8
      Top = 32
      Width = 81
      Height = 21
      Caption = #21830#21697#21517#31216
      Properties.OnChange = sBox1PropertiesChange
      State = cbsChecked
      TabOrder = 0
    end
    object sBox2: TcxCheckBox
      Left = 8
      Top = 56
      Width = 81
      Height = 21
      Caption = #21378#23478#35268#26684
      Properties.OnChange = sBox2PropertiesChange
      State = cbsChecked
      TabOrder = 1
    end
    object sBox3: TcxCheckBox
      Left = 8
      Top = 80
      Width = 73
      Height = 21
      Caption = #21333#20301
      Properties.OnChange = sBox3PropertiesChange
      State = cbsChecked
      TabOrder = 2
    end
    object sBox4: TcxCheckBox
      Left = 8
      Top = 104
      Width = 73
      Height = 21
      Caption = #36827#20215
      Properties.OnChange = sBox4PropertiesChange
      State = cbsChecked
      TabOrder = 3
    end
    object sBox5: TcxCheckBox
      Left = 8
      Top = 128
      Width = 73
      Height = 21
      Caption = #21806#20215
      Properties.OnChange = sBox5PropertiesChange
      State = cbsChecked
      TabOrder = 4
    end
    object sBox6: TcxCheckBox
      Left = 8
      Top = 152
      Width = 81
      Height = 21
      Caption = #25968#37327
      Properties.OnChange = sBox6PropertiesChange
      State = cbsChecked
      TabOrder = 5
    end
    object sBox7: TcxCheckBox
      Left = 8
      Top = 176
      Width = 73
      Height = 21
      Caption = #37329#39069
      Properties.OnChange = sBox7PropertiesChange
      State = cbsChecked
      TabOrder = 6
    end
    object sBox8: TcxCheckBox
      Left = 8
      Top = 200
      Width = 65
      Height = 21
      Caption = #25209#21457#20215
      Properties.OnChange = sBox8PropertiesChange
      TabOrder = 7
    end
    object cxButton4: TcxButton
      Left = 80
      Top = 200
      Width = 75
      Height = 25
      Caption = #20851#38381#27492#31383#21475
      TabOrder = 8
      OnClick = cxButton4Click
    end
  end
  object dy: TcxCheckBox
    Left = 304
    Top = 304
    Width = 73
    Height = 21
    Caption = #25171#21360#28165#21333
    State = cbsChecked
    TabOrder = 10
  end
  object Table2: TADOTable
    Connection = Dm1.qpsjk
    LockType = ltBatchOptimistic
    TableName = 'ckh'
    Left = 304
    Top = 168
  end
  object Table3: TADOTable
    Connection = Dm1.qpsjk
    LockType = ltBatchOptimistic
    TableName = 'fl3'
    Left = 304
    Top = 200
  end
  object DataSource0: TDataSource
    DataSet = spzl
    Left = 336
    Top = 104
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 336
    Top = 168
  end
  object DataSource3: TDataSource
    DataSet = Table3
    Left = 336
    Top = 200
  end
  object py: THzSpell
    Left = 416
    Top = 200
  end
  object spzl: TADOQuery
    Connection = Dm1.qpsjk
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from spk')
    Left = 304
    Top = 104
  end
  object ADOQy1: TADOQuery
    Connection = Dm1.qpsjk
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from spkc')
    Left = 304
    Top = 136
  end
  object DataSource1: TDataSource
    DataSet = ADOQy1
    Left = 336
    Top = 136
  end
  object sprk: TADOQuery
    Connection = Dm1.qpsjk
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from sprkd')
    Left = 448
    Top = 88
  end
  object Table8: TADOTable
    Connection = Dm1.qpsjk
    LockType = ltBatchOptimistic
    TableName = 'ckhfk'
    Left = 376
    Top = 168
  end
  object DataSource8: TDataSource
    DataSet = Table8
    Left = 408
    Top = 168
  end
  object PopupMenu1: TPopupMenu
    Left = 128
    Top = 232
    object N1: TMenuItem
      Caption = #26597#35810#24403#21069#20998#31867
      OnClick = N1Click
    end
  end
  object Table5: TADOTable
    Connection = Dm1.qpsjk
    LockType = ltBatchOptimistic
    TableName = 'fl5'
    Left = 240
    Top = 240
  end
  object DataSource5: TDataSource
    DataSet = Table5
    Left = 240
    Top = 208
  end
  object khzl: TADOQuery
    Connection = Dm1.qpsjk
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from ghszl')
    Left = 448
    Top = 120
  end
  object rkzk: TADOQuery
    Connection = Dm1.qpsjk
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from sprkzk')
    Left = 448
    Top = 152
  end
  object DataSource4: TDataSource
    DataSet = sprk
    Left = 488
    Top = 88
  end
  object DataSource6: TDataSource
    DataSet = khzl
    Left = 488
    Top = 120
  end
  object DataSource7: TDataSource
    DataSet = rkzk
    Left = 488
    Top = 152
  end
  object PopupMenu2: TPopupMenu
    Left = 496
    Top = 400
    object MenuItem1: TMenuItem
      Caption = #21024#38500#24403#21069#35760#24405
      OnClick = MenuItem1Click
    end
  end
  object PEh1: TPrintDBGridEh
    DBGridEh = DBGridEh2
    Options = [pghFitGridToPageWidth, pghOptimalColWidths]
    Page.BottomMargin = 1.000000000000000000
    Page.LeftMargin = 1.000000000000000000
    Page.RightMargin = 1.000000000000000000
    Page.TopMargin = 1.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -15
    PageFooter.Font.Name = #23435#20307
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -15
    PageHeader.Font.Name = #23435#20307
    PageHeader.Font.Style = []
    PrintFontName = #23435#20307
    Units = MM
    Left = 456
    Top = 400
  end
end