dmm2.~dfm

来自「品质管理系统：delphi+sql实现了制造企业在生产过程中对产品质量的控制」· ~DFM 代码 · 共 28 行

object Dm: TDm
  OldCreateOrder = False
  Left = 342
  Top = 169
  Height = 150
  Width = 215
  object Database1: TDatabase
    AliasName = 'dd'
    DatabaseName = 'aa'
    LoginPrompt = False
    Params.Strings = (
      'user name=sa')
    SessionName = 'Default'
    OnLogin = Database1Login
    Left = 72
    Top = 40
  end
  object conn: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data S' +
      'ource=dd;Initial Catalog=klmrp'
    LoginPrompt = False
    Left = 48
    Top = 8
  end
end