dm.~dfm

来自「本文件中还有JSP、php和delphi等源程序」· ~DFM 代码 · 共 59 行

object dm2: Tdm2
  OldCreateOrder = False
  Left = 388
  Top = 219
  Height = 236
  Width = 282
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=college;Data Source=localhost'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'SQLOLEDB.1'
    Left = 48
    Top = 48
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = ADOQuery1CalcFields
    Parameters = <>
    SQL.Strings = (
      'select * from xmb')
    Left = 128
    Top = 48
    object ADOQuery1DSDesigner: TWideStringField
      FieldName = #24207#21495
      Size = 5
    end
    object ADOQuery1DSDesigner2: TBCDField
      FieldName = #25910#20837
      Precision = 19
    end
    object ADOQuery1DSDesigner3: TBCDField
      FieldName = #25903#20986
      Precision = 19
    end
    object ADOQuery1DSDesigner4: TDateTimeField
      FieldName = #26085#26399
    end
    object ADOQuery1DSDesigner5: TWideStringField
      FieldName = #32463#25163#20154
      Size = 8
    end
    object ADOQuery1total: TCurrencyField
      FieldKind = fkCalculated
      FieldName = #21512#35745
      Calculated = True
    end
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'new'
    Left = 48
    Top = 112
  end
end