dm.dfm.~13~

来自「用于工厂对于门花尺寸进行自动计算」· ~13~ 代码 · 共 69 行

object DataModule1: TDataModule1
  OldCreateOrder = False
  Height = 150
  Width = 334
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\wo' +
      'rk\99woods\'#39033#30446'\'#38376#33457'\main.mdb;Mode=Share Deny None;Extended Properti' +
      'es="";Persist Security Info=False;Jet OLEDB:System database="";J' +
      'et OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLE' +
      'DB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Glo' +
      'bal Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet ' +
      'OLEDB:New Database Password="";Jet OLEDB:Create System Database=' +
      'False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Loca' +
      'le on Compact=False;Jet OLEDB:Compact Without Replica Repair=Fal' +
      'se;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 24
    Top = 16
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 40
    Top = 88
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'materailtype'
    Left = 136
    Top = 16
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 128
    Top = 88
  end
  object par1: TExParser
    Left = 208
    Top = 64
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 240
    Top = 16
  end
  object ADOTable2: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'display'
    Left = 248
    Top = 80
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery3
    Left = 272
    Top = 56
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 168
    Top = 64
  end
end