mainunit.~dfm

为前公司仓库发料开发的分练系统 入门及作品。

    DataSource = DS
    Filter.Criteria = {00000000}
    GroupPanelColor = clSkyBlue
    HeaderFont.Charset = ANSI_CHARSET
    HeaderFont.Color = clWindowText
    HeaderFont.Height = -11
    HeaderFont.Name = 'Microsoft Sans Serif'
    HeaderFont.Style = []
    HighlightTextColor = clCaptionText
    OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoStoreToIniFile, edgoStoreToRegistry, edgoTabThrough, edgoVertThrough]
    OptionsDB = [edgoCancelOnExit, edgoUseBookmarks]
    OptionsView = [edgoBandHeaderWidth, edgoInvertSelect, edgoUseBitmap]
    PreviewFont.Charset = DEFAULT_CHARSET
    PreviewFont.Color = clBlue
    PreviewFont.Height = -11
    PreviewFont.Name = 'MS Sans Serif'
    PreviewFont.Style = []
    object dxDBGridMaskColumn1: TdxDBGridMaskColumn
      Alignment = taCenter
      HeaderAlignment = taCenter
      BandIndex = 0
      RowIndex = 0
      FieldName = #39006#21029
    end
    object dxDBGridMaskColumn2: TdxDBGridMaskColumn
      Alignment = taCenter
      Caption = #23384#36008
      HeaderAlignment = taCenter
      Width = 38
      BandIndex = 0
      RowIndex = 0
      FieldName = #23384#36008#32068#32340
    end
    object dxDBGridMaskColumn3: TdxDBGridMaskColumn
      Alignment = taCenter
      HeaderAlignment = taCenter
      Width = 76
      BandIndex = 0
      RowIndex = 0
      FieldName = #30003#35531#21934#34399
    end
    object dxDBGridMaskColumn4: TdxDBGridMaskColumn
      Alignment = taCenter
      HeaderAlignment = taCenter
      BandIndex = 0
      RowIndex = 0
      FieldName = #24037#21934#34399#30908
    end
    object dxDBGridMaskColumn5: TdxDBGridMaskColumn
      Alignment = taLeftJustify
      HeaderAlignment = taCenter
      BandIndex = 0
      RowIndex = 0
      FieldName = #26009#34399
    end
    object dxDBGridMaskColumn6: TdxDBGridMaskColumn
      HeaderAlignment = taCenter
      Width = 120
      BandIndex = 0
      RowIndex = 0
      FieldName = #21697#21517#35215#26684
    end
    object dxDBGridMaskColumn7: TdxDBGridMaskColumn
      Alignment = taCenter
      HeaderAlignment = taCenter
      BandIndex = 0
      RowIndex = 0
      FieldName = #20489#20301
    end
    object dxDBGridMaskColumn8: TdxDBGridMaskColumn
      Alignment = taRightJustify
      HeaderAlignment = taCenter
      Width = 76
      BandIndex = 0
      RowIndex = 0
      FieldName = #25976#37327
    end
    object dxDBGridMaskColumn9: TdxDBGridMaskColumn
      Alignment = taLeftJustify
      HeaderAlignment = taCenter
      Width = 164
      BandIndex = 0
      RowIndex = 0
      FieldName = #24235#23384#25976#37327
    end
  end
  object DS: TDataSource
    DataSet = LS_Table
  end
  object LS_Table: TTable
    Active = True
    AfterOpen = LS_TableAfterOpen
    FieldDefs = <
      item
        Name = #23384#36008#32068#32340
        DataType = ftString
        Size = 14
      end
      item
        Name = #30003#35531#21934#34399
        DataType = ftString
        Size = 9
      end
      item
        Name = #20132#26131#39006#21029
        DataType = ftString
        Size = 8
      end
      item
        Name = 'Transaction Type'
        DataType = ftString
        Size = 12
      end
      item
        Name = #29983#29986#32218#21029
        DataType = ftString
        Size = 4
      end
      item
        Name = #38936#36864#26009#21934#20301
        DataType = ftString
        Size = 12
      end
      item
        Name = #38936#26009#26085#26399
        DataType = ftDate
      end
      item
        Name = #30003#35531#26085#26399
        DataType = ftDate
      end
      item
        Name = #32147#36774#20154
        DataType = ftString
        Size = 6
      end
      item
        Name = #24037#21934#34399#30908
        DataType = ftString
        Size = 16
      end
      item
        Name = #38917#27425
        DataType = ftString
        Size = 2
      end
      item
        Name = #26009#34399
        DataType = ftString
        Size = 16
      end
      item
        Name = #21697#21517#35215#26684
        DataType = ftString
        Size = 64
      end
      item
        Name = #20489#20301
        DataType = ftString
        Size = 6
      end
      item
        Name = #20786#20301
        DataType = ftString
        Size = 8
      end
      item
        Name = #25976#37327
        DataType = ftFloat
      end
      item
        Name = #20633#35387
        DataType = ftString
        Size = 40
      end
      item
        Name = #39006#21029
        DataType = ftString
        Size = 6
      end
      item
        Name = #24235#23384#25976#37327
        DataType = ftString
        Size = 22
      end>
    StoreDefs = True
    TableName = 'Ls.db'
    Left = 32
    object LS_TableBDEDesigner17: TStringField
      FieldName = #39006#21029
      Size = 6
    end
    object LS_TableBDEDesigner: TStringField
      FieldName = #23384#36008#32068#32340
      Size = 14
    end
    object LS_TableBDEDesigner2: TStringField
      FieldName = #30003#35531#21934#34399
      Size = 9
    end
    object LS_TableBDEDesigner3: TStringField
      FieldName = #20132#26131#39006#21029
      Size = 8
    end
    object LS_TableTransactionType: TStringField
      FieldName = 'Transaction Type'
      Size = 12
    end
    object LS_TableBDEDesigner4: TStringField
      FieldName = #29983#29986#32218#21029
      Size = 4
    end
    object LS_TableBDEDesigner5: TStringField
      FieldName = #38936#36864#26009#21934#20301
      Size = 12
    end
    object LS_TableBDEDesigner6: TDateField
      FieldName = #38936#26009#26085#26399
    end
    object LS_TableBDEDesigner7: TDateField
      FieldName = #30003#35531#26085#26399
    end
    object LS_TableBDEDesigner8: TStringField
      FieldName = #32147#36774#20154
      Size = 6
    end
    object LS_TableBDEDesigner9: TStringField
      FieldName = #24037#21934#34399#30908
      Size = 16
    end
    object LS_TableBDEDesigner10: TStringField
      FieldName = #38917#27425
      Size = 2
    end
    object LS_TableBDEDesigner11: TStringField
      FieldName = #26009#34399
      Size = 16
    end
    object LS_TableBDEDesigner12: TStringField
      FieldName = #21697#21517#35215#26684
      Size = 64
    end
    object LS_TableBDEDesigner13: TStringField
      FieldName = #20489#20301
      Size = 6
    end
    object LS_TableBDEDesigner14: TStringField
      FieldName = #20786#20301
      Size = 8
    end
    object LS_TableBDEDesigner15: TFloatField
      FieldName = #25976#37327
    end
    object LS_TableBDEDesigner16: TStringField
      FieldName = #20633#35387
      Size = 40
    end
    object LS_TableBDEDesigner18: TStringField
      FieldName = #24235#23384#25976#37327
      Size = 22
    end
  end
  object Kc_Table: TTable
    Active = True
    AfterOpen = Kc_TableAfterOpen
    FieldDefs = <
      item
        Name = #26009#34399
        DataType = ftString
        Size = 16
      end
      item
        Name = #21697#21517#35215#26684
        DataType = ftString
        Size = 64
      end
      item
        Name = #21934#20301
        DataType = ftString
        Size = 4
      end
      item
        Name = #20489#20301
        DataType = ftString
        Size = 6
      end
      item
        Name = #20786#20301
        DataType = ftString
        Size = 8
      end
      item
        Name = #25976#37327
        DataType = ftFloat
      end>
    StoreDefs = True
    TableName = 'Kc.db'
    Left = 96
    object Kc_TableBDEDesigner: TStringField
      FieldName = #26009#34399
      Size = 16
    end
    object Kc_TableBDEDesigner2: TStringField
      FieldName = #21697#21517#35215#26684
      Size = 64
    end
    object Kc_TableBDEDesigner3: TStringField
      FieldName = #21934#20301
      Size = 4
    end
    object Kc_TableBDEDesigner4: TStringField
      FieldName = #20489#20301
      Size = 6
    end
    object Kc_TableBDEDesigner5: TStringField
      FieldName = #20786#20301
      Size = 8
    end
    object Kc_TableBDEDesigner6: TFloatField
      FieldName = #25976#37327
    end
  end
  object Item_Table: TTable
    Active = True
    TableName = 'Item.db'
    Left = 64
    object Item_TableBDEDesigner: TStringField
      FieldName = #26009#34399
      Size = 16
    end
    object Item_TableBDEDesigner2: TStringField
      FieldName = #39006#21029
      Size = 6
    end
  end
  object OD: TOpenDialog
    Filter = 'Excel'#25991#20214'|*.xls'
    Left = 128
  end
end