inv140_01.dfm.svn-base

来自「一个用Delphi开发的ERP软件」· SVN-BASE 代码 · 共 60 行

inherited Inv140_01Form: TInv140_01Form
  Left = 52
  Top = 43
  Caption = #35745#37327#21333#20301#32500#25252
  PixelsPerInch = 96
  TextHeight = 12
  inherited ScrollBox1: TScrollBox
    inherited dxDBGrid1: TdxDBGrid
      Filter.Criteria = {00000000}
      object dxDBGrid1I140_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I140_002'
      end
      object dxDBGrid1I140_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 304
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I140_003'
      end
      object dxDBGrid1I140_004: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 93
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I140_004'
      end
    end
  end
  inherited ADOQuery1: TADOQuery
    SQL.Strings = (
      'select * from INV140 order by I140_002')
    object ADOQuery1I140_001: TAutoIncField
      FieldName = 'I140_001'
      ReadOnly = True
      Visible = False
    end
    object ADOQuery1I140_002: TWideStringField
      DisplayLabel = #21333#20301#32534#21495
      FieldName = 'I140_002'
    end
    object ADOQuery1I140_003: TWideStringField
      DisplayLabel = #21333#20301#21517#31216
      FieldName = 'I140_003'
      Size = 50
    end
    object ADOQuery1I140_004: TSmallintField
      DisplayLabel = #21333#20301#31867#22411
      FieldName = 'I140_004'
      OnGetText = ADOQuery1I140_004GetText
    end
  end
end