patientdatam.dfm

来自「某疗养院动脉硬化管理系统」· DFM 代码 · 共 37 行

object PatientDM: TPatientDM
  OldCreateOrder = True
  OnCreate = DataModuleCreate
  Left = 222
  Top = 107
  Height = 265
  Width = 319
  object ADOCnOracle: TADOConnection
    LoginPrompt = False
    Provider = 'MSDAORA.1'
    Left = 40
    Top = 16
  end
  object ADQView: TADOQuery
    Connection = ADOCnOracle
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM REDH.HVS_DMYHPATINFO')
    Left = 128
    Top = 16
  end
  object ADQUnWrite: TADOQuery
    Connection = DM.ADOCn
    CursorType = ctStatic
    Parameters = <>
    Left = 128
    Top = 80
  end
  object ADQComplete: TADOQuery
    Connection = DM.ADOCn
    Parameters = <>
    Left = 128
    Top = 144
  end
end