wzzd.dfm

物资管理系统 包括屋子入库出库管理

object WZZDForm: TWZZDForm
  Left = 196
  Top = 185
  Width = 640
  Height = 480
  Caption = #29289#36164#23383#20856
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter: TSplitter
    Left = 185
    Top = 0
    Height = 453
  end
  object pnlRight: TPanel
    Left = 188
    Top = 0
    Width = 444
    Height = 453
    Align = alClient
    TabOrder = 0
    object pnlToolBar: TPanel
      Left = 1
      Top = 1
      Width = 442
      Height = 33
      Align = alTop
      BevelOuter = bvLowered
      TabOrder = 0
      object btAdd: TButton
        Left = 4
        Top = 4
        Width = 75
        Height = 25
        Caption = #22686#21152
        TabOrder = 0
        OnClick = btAddClick
      end
      object btDel: TButton
        Left = 80
        Top = 4
        Width = 75
        Height = 25
        Caption = #21024#38500
        TabOrder = 1
        OnClick = btDelClick
      end
    end
    object dbWZZD: TDBGrid
      Left = 1
      Top = 34
      Width = 442
      Height = 418
      Align = alClient
      DataSource = dsWZZD
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'BM'
          Title.Caption = #32534#30721
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MC'
          Title.Caption = #21517#31216
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GG'
          Title.Caption = #35268#26684
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DW'
          Title.Caption = #21333#20301
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DJ'
          Title.Caption = #21333#20215
          Width = 80
          Visible = True
        end>
    end
  end
  object pnlLeft: TPanel
    Left = 0
    Top = 0
    Width = 185
    Height = 453
    Align = alLeft
    TabOrder = 1
    object tvLb: TTreeView
      Left = 1
      Top = 33
      Width = 183
      Height = 419
      Align = alClient
      HideSelection = False
      Indent = 19
      ReadOnly = True
      TabOrder = 0
      OnChange = tvLbChange
    end
    object pnlWzlb: TPanel
      Left = 1
      Top = 1
      Width = 183
      Height = 32
      Align = alTop
      BevelOuter = bvLowered
      Caption = #29289#36164#31867#21035
      TabOrder = 1
    end
  end
  object dsWZZD: TDataSource
    DataSet = adotWZZD
    OnDataChange = dsWZZDDataChange
    Left = 320
    Top = 136
  end
  object adotWZZD: TADOTable
    TableName = 'WZZD'
    Left = 248
    Top = 136
  end
  object adoqWzlb: TADOQuery
    Parameters = <>
    Left = 112
    Top = 136
  end
end