unit_dm.~dfm

本系统里面包含数据库（SQL SERVER2000）

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 192
  Top = 107
  Height = 385
  Width = 394
  object ADOC: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=file;Data Source=.'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 24
    Top = 16
  end
  object files: TADOQuery
    Connection = ADOC
    Parameters = <>
    SQL.Strings = (
      'select * from files')
    Left = 76
    Top = 16
    object filessno: TAutoIncField
      FieldName = 'sno'
      ReadOnly = True
    end
    object filesitem1: TStringField
      FieldName = 'item1'
      FixedChar = True
      Size = 8
    end
    object filesitem2: TStringField
      FieldName = 'item2'
      FixedChar = True
      Size = 10
    end
    object filesitem3: TStringField
      FieldName = 'item3'
      FixedChar = True
      Size = 2
    end
    object filesitem4: TStringField
      FieldName = 'item4'
      FixedChar = True
      Size = 8
    end
    object filesitem5: TStringField
      FieldName = 'item5'
      FixedChar = True
      Size = 4
    end
    object filesitem6: TStringField
      FieldName = 'item6'
      FixedChar = True
      Size = 40
    end
    object filesitem7: TDateTimeField
      FieldName = 'item7'
    end
    object filesitem8: TStringField
      FieldName = 'item8'
      FixedChar = True
      Size = 8
    end
    object filesitem9: TStringField
      FieldName = 'item9'
      FixedChar = True
    end
    object filesitem10: TStringField
      FieldName = 'item10'
      FixedChar = True
      Size = 8
    end
    object filesitem11: TStringField
      FieldName = 'item11'
      FixedChar = True
      Size = 10
    end
    object filesitem12: TStringField
      FieldName = 'item12'
      FixedChar = True
      Size = 12
    end
    object filesitem13: TStringField
      FieldName = 'item13'
      FixedChar = True
      Size = 13
    end
    object filesitem14: TDateTimeField
      FieldName = 'item14'
    end
    object filesitem15: TDateTimeField
      FieldName = 'item15'
    end
    object filesitem16: TStringField
      FieldName = 'item16'
      FixedChar = True
      Size = 18
    end
    object filesitem17: TStringField
      FieldName = 'item17'
      Size = 50
    end
    object filesitem18: TDateTimeField
      FieldName = 'item18'
    end
    object filesitem19: TMemoField
      FieldName = 'item19'
      BlobType = ftMemo
    end
    object filesitem20: TMemoField
      FieldName = 'item20'
      BlobType = ftMemo
    end
    object filesitem21: TMemoField
      FieldName = 'item21'
      BlobType = ftMemo
    end
    object filesitem22: TMemoField
      FieldName = 'item22'
      BlobType = ftMemo
    end
    object filesitem23: TMemoField
      FieldName = 'item23'
      BlobType = ftMemo
    end
    object filesitem24: TStringField
      FieldName = 'item24'
      Size = 50
    end
    object filesitem25: TStringField
      FieldName = 'item25'
      FixedChar = True
    end
    object filesitem26: TStringField
      FieldName = 'item26'
      FixedChar = True
    end
    object filesitem27: TStringField
      FieldName = 'item27'
      FixedChar = True
    end
    object filesitem28: TStringField
      FieldName = 'item28'
      FixedChar = True
    end
    object filesitem29: TStringField
      FieldName = 'item29'
      FixedChar = True
    end
    object filesitem30: TStringField
      FieldName = 'item30'
      FixedChar = True
    end
    object filesidh: TStringField
      FieldName = 'idh'
      FixedChar = True
      Size = 14
    end
  end
  object dsfiles: TDataSource
    DataSet = files
    Left = 124
    Top = 16
  end
end