datamoduleunit.dfm

贸易管理系统Delphi源代码（有开发文档） 采用access+delphi设计 软件实现功能：供应商信息的输入

object DataModule2: TDataModule2
  OldCreateOrder = False
  Left = 176
  Top = 186
  Height = 289
  Width = 522
  object DSinfind: TDataSource
    DataSet = ADSinfind
    Left = 56
    Top = 88
  end
  object ADSinfind: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #20379#24212#21830#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 56
    Top = 32
  end
  object ADSsalefind: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #38144#21806#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 112
    Top = 32
  end
  object DSsalefind: TDataSource
    DataSet = ADSsalefind
    Left = 112
    Top = 88
  end
  object DScustomerfind: TDataSource
    DataSet = ADScustomerfind
    Left = 160
    Top = 88
  end
  object ADScustomerfind: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #39038#23458#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 160
    Top = 32
  end
  object ADODataSet1: TADODataSet
    Parameters = <>
    Left = 224
    Top = 32
  end
  object DataSource1: TDataSource
    Left = 224
    Top = 88
  end
  object ADSgoods: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #21830#21697#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 296
    Top = 32
  end
  object DSgoods: TDataSource
    DataSet = ADSgoods
    Left = 296
    Top = 88
  end
  object DScustomerms: TDataSource
    DataSet = ADScustomerms
    Left = 368
    Top = 88
  end
  object ADScustomerms: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #39038#23458#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 368
    Top = 32
  end
  object DSid: TDataSource
    DataSet = ADSid
    Left = 16
    Top = 88
  end
  object ADSid: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #30331#20837#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 16
    Top = 32
  end
  object DSsupplyms: TDataSource
    DataSet = ADSsupplyms
    Left = 440
    Top = 88
  end
  object ADSsupplyms: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#36152#26131#20844#21496#31649#29702#20449#24687#31995#32479'.mdb;Pers' +
      'ist Security Info=False'
    CursorType = ctStatic
    CommandText = #20379#24212#21830#20449#24687
    CommandType = cmdTable
    Parameters = <>
    Left = 440
    Top = 32
  end
end