inv110_01.dfm

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Inv110_01Form: TInv110_01Form
  Caption = #24211#20301#36164#26009#32500#25252
  PixelsPerInch = 96
  TextHeight = 12
  inherited ScrollBox1: TScrollBox
    inherited dxDBGrid1: TdxDBGrid
      Filter.Criteria = {00000000}
      object dxDBGrid1I100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I100_002'
      end
      object dxDBGrid1I100_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 304
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I100_003'
      end
      object dxDBGrid1I110_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_003'
      end
      object dxDBGrid1I110_004: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 304
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_004'
      end
      object dxDBGrid1I110_005: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 77
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_005'
      end
      object dxDBGrid1I110_006: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_006'
      end
      object dxDBGrid1I110_007: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_007'
      end
      object dxDBGrid1I110_008: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_008'
      end
      object dxDBGrid1I110_009: TdxDBGridCheckColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_009'
        ValueChecked = 'True'
        ValueUnchecked = 'False'
      end
      object dxDBGrid1I110_010: TdxDBGridCheckColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_010'
        ValueChecked = 'True'
        ValueUnchecked = 'False'
      end
      object dxDBGrid1I110_011: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I110_011'
      end
    end
  end
  inherited ADOQuery1: TADOQuery
    SQL.Strings = (
      
        'select A.*,B.I100_002,I100_003 from INV110 A,INV100 B where I110' +
        '_002=I100_001 order by I110_002,I110_003')
    object ADOQuery1I110_001: TAutoIncField
      FieldName = 'I110_001'
      ReadOnly = True
      Visible = False
    end
    object ADOQuery1I110_002: TIntegerField
      FieldName = 'I110_002'
      Visible = False
    end
    object ADOQuery1I100_002: TWideStringField
      DisplayLabel = #20179#24211#32534#21495
      FieldName = 'I100_002'
    end
    object ADOQuery1I100_003: TWideStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'I100_003'
      Size = 50
    end
    object ADOQuery1I110_003: TWideStringField
      DisplayLabel = #24211#20301#32534#21495
      FieldName = 'I110_003'
    end
    object ADOQuery1I110_004: TWideStringField
      DisplayLabel = #24211#20301#21517#31216
      FieldName = 'I110_004'
      Size = 50
    end
    object ADOQuery1I110_005: TSmallintField
      DisplayLabel = #24211#20301#31867#22411
      FieldName = 'I110_005'
    end
    object ADOQuery1I110_006: TFloatField
      DisplayLabel = #23481#31215#33021#21147
      FieldName = 'I110_006'
    end
    object ADOQuery1I110_007: TFloatField
      DisplayLabel = #23481#37325#33021#21147
      FieldName = 'I110_007'
    end
    object ADOQuery1I110_008: TFloatField
      DisplayLabel = #24211#20301#33021#21147
      FieldName = 'I110_008'
    end
    object ADOQuery1I110_009: TBooleanField
      DisplayLabel = #21487#20998#37197#21542
      FieldName = 'I110_009'
    end
    object ADOQuery1I110_010: TBooleanField
      DisplayLabel = #35745#31639' MRP'
      FieldName = 'I110_010'
    end
    object ADOQuery1I110_011: TSmallintField
      DisplayLabel = #24211#20301#29366#24577
      FieldName = 'I110_011'
    end
  end
end