data.dfm

来自「odac for oralce 8i,10g,11g easy to conn」· DFM 代码 · 共 63 行

object Datas: TDatas
  OldCreateOrder = False
  OnCreate = DatasCreate
  OnDestroy = DatasDestroy
  Left = 258
  Top = 169
  Height = 480
  Width = 696
  object OraSession: TOraSession
    Username = 'Scott'
    Password = 'tiger'
    Server = 'ora'
    Connected = True
    ConnectDialog = ConnectDialog
    OnConnectChange = OraSessionConnectChange
    Left = 24
    Top = 16
  end
  object Query: TSmartQuery
    KeyFields = 'DEPTNO'
    Session = OraSession
    SQL.Strings = (
      'SELECT D.*'
      'FROM Scott.Dept D'
      'WHERE DeptNo < :DeptNo'
      '')
    Debug = True
    Left = 72
    Top = 16
    ParamData = <
      item
        DataType = ftInteger
        Name = 'DeptNo'
        Value = 50
      end>
  end
  object DataSetProvider: TDataSetProvider
    DataSet = Query
    Constraints = True
    ResolveToDataSet = True
    Options = [poNoReset]
    Left = 128
    Top = 64
  end
  object ConnectDialog: TConnectDialog
    SavePassword = True
    Caption = 'Connect'
    UsernameLabel = 'User Name'
    PasswordLabel = 'Password'
    ServerLabel = 'Server'
    ConnectButton = 'Connect'
    CancelButton = 'Cancel'
    Left = 24
    Top = 64
  end
  object OraProvider: TOraProvider
    DataSet = Query
    Constraints = True
    Left = 128
    Top = 16
  end
end