udm.dfm

来自「面向对象数据库开发时」· DFM 代码 · 共 36 行

object DM: TDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 275
  Top = 233
  Height = 201
  Width = 297
  object ADOCon: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=SaleBuilding;Use Procedure for Prepare=1;Auto Transla' +
      'te=True;Packet Size=4096;Workstation ID=ZZ-2F47B5GC51LH;Use Encr' +
      'yption for Data=False;Tag with column collation when possible=Fa' +
      'lse'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 40
    Top = 16
  end
  object qryTemp: TADOQuery
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from building')
    Left = 40
    Top = 80
  end
  object qryTemp2: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 104
    Top = 80
  end
end