unit2.dfm

来自「Navision ERP 极品补丁」· DFM 代码 · 共 68 行

object dm: Tdm
  OldCreateOrder = False
  Left = 507
  Top = 339
  Height = 349
  Width = 473
  object ADOC: TADOConnection
    ConnectionString = 'FILE NAME=E:\DELPHI FILES\'#22312#32447#20154#25968'\'#22312#32447#20154#25968'\CONN.UDL'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 16
    Top = 8
  end
  object ADOQ1: TADOQuery
    Connection = ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select "'#29992#25143' ID","'#30331#24405#26102#38388'","'#24403#21069#20250#35805'","'#20027#26426#21517'","'#31354#38386#26102#38388'" from "RadianceFinal"."' +
        'dbo"."'#20250#35805'"')
    Left = 64
    Top = 8
  end
  object ds1: TDataSource
    DataSet = ADOQ1
    Left = 120
    Top = 8
  end
  object ADOQ2: TADOQuery
    Connection = ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from "RadianceFinal"."dbo"."'#20250#35805'" ')
    Left = 184
    Top = 8
  end
  object ds2: TDataSource
    DataSet = ADOQ2
    Left = 248
    Top = 8
  end
  object ADOQ3: TADOQuery
    Connection = ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from "SQLDB"."dbo"."timetemp" ')
    Left = 304
    Top = 8
  end
  object ds4: TDataSource
    DataSet = ADOQ5
    Left = 360
    Top = 8
  end
  object ADOQ5: TADOQuery
    Connection = ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select "'#36830#25509' ID" from "RadianceFinal"."dbo"."'#20250#35805'" ')
    Left = 16
    Top = 56
  end
end