data.dfm

仓库管理信息系统

object dm: Tdm
  OldCreateOrder = False
  Left = 221
  Top = 63
  Height = 464
  Width = 578
  object ADOCN: TADOConnection
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 8
    Top = 8
  end
  object whckdmads: TADODataSet
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select * from CKDMB'
    Parameters = <>
    Left = 64
    Top = 16
  end
  object whbmdmads: TADODataSet
    Connection = ADOCN
    CommandText = 'select * from BMDMB'
    Parameters = <>
    Left = 64
    Top = 224
    object whbmdmadsID: TStringField
      FieldName = #37096#38376'ID'
      FixedChar = True
      Size = 4
    end
    object whbmdmadsDSDesigner: TStringField
      FieldName = #37096#38376#21517#31216
      FixedChar = True
      Size = 12
    end
  end
  object bmlymxads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select '#20986#20179#26085#26399', '#26448#26009#32534#30721', '#25968#37327', '#21333#20215', '#37329#39069', '#20986#20179#21333#21495' from bmlymxb'
    IndexFieldNames = #20986#20179#21333#21495
    Parameters = <>
    Left = 352
    Top = 280
    object bmlymxadsID: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object bmlymxadsStringField: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object bmlymxadsStringField2: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object bmlymxadsStringField3: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #21333#20301
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object bmlymxadsStringField4: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#21517#31216
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#21517#31216
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object bmlymxadsDSDesigner: TDateTimeField
      FieldName = #20986#20179#26085#26399
    end
    object bmlymxadsDSDesigner2: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object bmlymxadsDSDesigner3: TIntegerField
      FieldName = #25968#37327
    end
    object bmlymxadsDSDesigner4: TBCDField
      FieldName = #21333#20215
      Precision = 19
    end
    object bmlymxadsDSDesigner5: TBCDField
      FieldName = #37329#39069
      Precision = 19
    end
    object bmlymxadsDSDesigner6: TStringField
      FieldName = #20986#20179#21333#21495
      FixedChar = True
      Size = 10
    end
  end
  object gysghmxads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select  * from jcmxcx'
    Parameters = <>
    Left = 352
    Top = 376
    object gysghmxadsStringField5: TStringField
      FieldKind = fkLookup
      FieldName = #39564#25910#20154
      LookupDataSet = whysrads
      LookupKeyFields = #39564#25910#20154'ID'
      LookupResultField = #39564#25910#20154
      KeyFields = #39564#25910#20154'ID'
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsID4: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsStringField: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsStringField2: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsStringField3: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #21333#20301
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsStringField4: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#21517#31216
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#21517#31216
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object gysghmxadsDSDesigner: TDateTimeField
      FieldName = #36827#20179#26085#26399
    end
    object gysghmxadsID3: TStringField
      FieldName = #39564#25910#20154'ID'
      FixedChar = True
      Size = 4
    end
    object gysghmxadsDSDesigner2: TStringField
      FieldName = #36865#36135#21333#21495
      FixedChar = True
      Size = 10
    end
    object gysghmxadsDSDesigner3: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object gysghmxadsDSDesigner4: TIntegerField
      FieldName = #25968#37327
    end
    object gysghmxadsDSDesigner5: TBCDField
      FieldName = #21333#20215
      Precision = 19
    end
    object gysghmxadsDSDesigner6: TBCDField
      FieldName = #37329#39069
      Precision = 19
    end
  end
  object whcclxdmads: TADODataSet
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select * FROM CCLXB'
    Parameters = <>
    Left = 64
    Top = 272
  end
  object whjcdads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    BeforeDelete = whjcdadsBeforeDelete
    OnNewRecord = whjcdadsNewRecord
    CommandText = 'select * from JCDHB'
    Parameters = <>
    Left = 192
    Top = 16
    object whjcdadsID: TAutoIncField
      FieldName = #36827#20179'ID'
      ReadOnly = True
    end
    object whjcdadsDSDesigner: TStringField
      FieldName = #36865#36135#21333#21495
      FixedChar = True
      Size = 10
    end
    object whjcdadsDSDesigner2: TDateTimeField
      FieldName = #36827#20179#26085#26399
    end
    object whjcdadsID2: TStringField
      FieldName = #36827#20179#31867#22411'ID'
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whjcdadsID3: TStringField
      FieldName = #20379#24212#21830'ID'
      LookupCache = True
      FixedChar = True
      Size = 6
    end
    object whjcdadsID4: TStringField
      FieldName = #29992#25143'ID'
      FixedChar = True
      Size = 2
    end
    object whjcdadsID5: TStringField
      FieldName = #20179#24211'ID'
      FixedChar = True
      Size = 4
    end
    object whjcdadsID6: TStringField
      FieldName = #39564#25910#20154'ID'
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whjcdadsField: TStringField
      FieldKind = fkLookup
      FieldName = #36827#20179#31867#22411
      LookupDataSet = whjclxdmads
      LookupKeyFields = #36827#20179#31867#22411'ID'
      LookupResultField = #36827#20179#31867#22411
      KeyFields = #36827#20179#31867#22411'ID'
      LookupCache = True
      Lookup = True
    end
    object whjcdadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #20379#24212#21830
      LookupDataSet = whgysdmads
      LookupKeyFields = #20379#24212#21830'ID'
      LookupResultField = #20379#24212#21830#31616#31216
      KeyFields = #20379#24212#21830'ID'
      LookupCache = True
      Lookup = True
    end
    object whjcdadsDSDesigner3: TStringField
      FieldName = #22791#27880
      FixedChar = True
      Size = 40
    end
    object whjcdadsField3: TStringField
      FieldKind = fkLookup
      FieldName = #39564#25910#20154
      LookupDataSet = whysrads
      LookupKeyFields = #39564#25910#20154'ID'
      LookupResultField = #39564#25910#20154
      KeyFields = #39564#25910#20154'ID'
      LookupCache = True
      Lookup = True
    end
  end
  object whjcmxads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    BeforeInsert = whjcmxadsBeforeInsert
    BeforePost = whjcmxadsBeforePost
    AfterPost = whjcmxadsAfterPost
    OnNewRecord = whjcmxadsNewRecord
    CommandText = 'select * from JCMXB'
    DataSource = whjcdds
    IndexFieldNames = #36827#20179'ID'
    MasterFields = #36827#20179'ID'
    Parameters = <>
    Left = 192
    Top = 64
    object whjcmxadsID: TAutoIncField
      FieldName = #36827#20179#26126#32454'ID'
      ReadOnly = True
    end
    object whjcmxadsID2: TStringField
      FieldName = #36827#20179'ID'
      FixedChar = True
      Size = 12
    end
    object whjcmxadsField: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#21517#31216
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#21517#31216
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsDSDesigner: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object whjcmxadsField4: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #21333#20301
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsField3: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsID3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsDSDesigner2: TIntegerField
      FieldName = #25968#37327
      OnChange = whjcmxadsDSDesigner2Change
    end
    object whjcmxadsDSDesigner3: TBCDField
      FieldName = #21333#20215
      OnChange = whjcmxadsDSDesigner3Change
      Precision = 19
    end
    object whjcmxadsDSDesigner4: TBCDField
      FieldName = #37329#39069
      Precision = 19
    end
    object whjcmxadsDSDesigner5: TStringField
      FieldName = #22791#27880
      FixedChar = True
    end
  end
  object whccdads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    BeforeDelete = whccdadsBeforeDelete
    OnNewRecord = whccdadsNewRecord
    CommandText = 'select * from CCDHB'
    Parameters = <>
    Left = 194
    Top = 110
    object whccdadsID: TAutoIncField
      FieldName = #20986#20179'ID'
      ReadOnly = True
    end
    object whccdadsDSDesigner: TStringField
      FieldName = #20986#20179#21333#21495
      FixedChar = True
      Size = 10
    end
    object whccdadsDSDesigner2: TDateTimeField
      FieldName = #20986#20179#26085#26399
    end
    object whccdadsID2: TStringField
      FieldName = #20986#20179#31867#22411'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #20986#20179#31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #20986#20179#31867#22411'ID'
      LookupCache = True
      Lookup = True
    end
    object whccdadsField: TStringField
      FieldKind = fkLookup
      FieldName = #37096#38376
      LookupDataSet = whbmdmads
      LookupKeyFields = #37096#38376'ID'
      LookupResultField = #37096#38376#21517#31216
      KeyFields = #37096#38376'ID'
      LookupCache = True
      Lookup = True
    end
    object whccdadsID3: TStringField
      FieldName = #37096#38376'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsID4: TStringField
      FieldName = #29992#25143'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsID5: TStringField
      FieldName = #20179#24211'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsDSDesigner3: TStringField
      FieldName = #39046#29992#20154
      FixedChar = True
      Size = 8
    end
    object whccdadsDSDesigner4: TStringField
      FieldName = #22791#27880
      FixedChar = True
      Size = 40
    end
  end
  object QCLYADS: TADODataSet
    CacheSize = 1000