datamodule.dfm

来自「程序员电子日记本：用记录日常事务等一些其它生活事」· DFM 代码 · 共 57 行

object DM1: TDM1
  OldCreateOrder = False
  Left = 426
  Top = 241
  Height = 271
  Width = 215
  object ADOCON: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Diary.mdb;Persist S' +
      'ecurity Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 16
    Top = 8
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOCON
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'SELECT Diary.RQ,Diary.TQ,Diary.BT,Diary.XM,Diary.ly,Diary.lysx,D' +
        'iary.xxlr'
      '  from diary'
      '')
    Left = 24
    Top = 64
  end
  object DS1: TDataSource
    DataSet = ADOQuery1
    Left = 88
    Top = 64
  end
  object ADOQuery2: TADOQuery
    Active = True
    Connection = ADOCON
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'SELECT Diary.RQ,Diary.TQ,Diary.BT,Diary.XM,Diary.ly,Diary.lysx,D' +
        'iary.xxlr'
      '  from diary'
      '')
    Left = 24
    Top = 112
  end
  object DS2: TDataSource
    DataSet = ADOQuery2
    Left = 88
    Top = 112
  end
end