udm.dfm.~53~

来自「delphi2007开发的汽车配件进销存系统.实用级的源码.」· ~53~ 代码 · 共 232 行

object DM: TDM
  OldCreateOrder = False
  Height = 357
  Width = 451
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 'FILE NAME=.\conn.udl'
    LoginPrompt = False
    Provider = 'SQLNCLI.1'
    Left = 56
    Top = 24
  end
  object qry1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tmp_jhd')
    Left = 32
    Top = 88
  end
  object DS1: TDataSource
    DataSet = qry1
    Left = 67
    Top = 88
  end
  object qry2: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from spxx')
    Left = 32
    Top = 160
  end
  object ds2: TDataSource
    DataSet = qry2
    Left = 67
    Top = 160
  end
  object connqry: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from spxx')
    Left = 339
    Top = 88
  end
  object connds: TDataSource
    DataSet = connqry
    Left = 387
    Top = 88
  end
  object qry3: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select spxx.*,kcxx.sl as kcsl from spxx ,kcxx where spxx.bm=kcxx' +
        '.bm')
    Left = 32
    Top = 224
  end
  object ds3: TDataSource
    DataSet = qry3
    Left = 67
    Top = 224
  end
  object qry4: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from xsd')
    Left = 32
    Top = 288
  end
  object ds4: TDataSource
    DataSet = qry4
    Left = 67
    Top = 288
  end
  object qry5: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select a.*,b.dwmc,b.ch from xsd a,dwgl b where a.dwbm=b.dwbm ord' +
        'er by a.xsdh desc')
    Left = 120
    Top = 90
  end
  object ds5: TDataSource
    DataSet = qry5
    Left = 155
    Top = 90
  end
  object qry6: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from xsd where jzbz='#39'Y'#39)
    Left = 120
    Top = 162
  end
  object ds6: TDataSource
    DataSet = qry6
    Left = 155
    Top = 162
  end
  object qry7: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from dwgl')
    Left = 120
    Top = 226
  end
  object ds7: TDataSource
    DataSet = qry7
    Left = 155
    Top = 226
  end
  object qry8: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'select * from TMP_xsdmx')
    Left = 120
    Top = 290
  end
  object ds8: TDataSource
    DataSet = qry8
    Left = 155
    Top = 290
  end
  object qryPrint: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      
        'select a.*,b.dw,b.hw from XS070629215606 a,spxx b where a.bm=b.b' +
        'm')
    Left = 336
    Top = 138
  end
  object dsprint: TDataSource
    DataSet = qryPrint
    Left = 387
    Top = 138
  end
  object qryprint1: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'select a.*,b.* from xsd a,dwgl b where  a.dwbm=b.dwbm')
    Left = 336
    Top = 194
  end
  object dsprint1: TDataSource
    DataSet = qryprint1
    Left = 387
    Top = 194
  end
  object qryprint2: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'select * from dybq')
    Left = 336
    Top = 258
  end
  object dsprint2: TDataSource
    DataSet = qryprint2
    Left = 387
    Top = 258
  end
  object qry9: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'select * from xsdmx')
    Left = 208
    Top = 90
  end
  object ds9: TDataSource
    DataSet = qry9
    Left = 243
    Top = 90
  end
  object qry10: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'select * from puser')
    Left = 208
    Top = 162
  end
  object ds10: TDataSource
    DataSet = qry10
    Left = 243
    Top = 162
  end
end