u_data1.dfm

来自「sqllite3数据库基本应用(打开,关闭表,及更新数据表)」· DFM 代码 · 共 48 行

object Data: TData
  OldCreateOrder = False
  Left = 198
  Top = 119
  Height = 244
  Width = 283
  object db: TASQLite3DB
    Database = 'syw.syw'
    DefaultExt = '.syw'
    Version = '3.3.4'
    DriverDLL = 'SQLite3.dll'
    Connected = True
    MustExist = False
    ExecuteInlineSQL = False
    Left = 88
    Top = 64
  end
  object UpdateSQL: TASQLite3UpdateSQL
    DeleteSQL.Strings = (
      'delete from department where departmentname=:departmentname')
    Left = 136
    Top = 64
  end
  object qmain: TASQLite3Query
    AutoCommit = False
    SQLiteDateFormat = True
    Connection = db
    MaxResults = 0
    StartResult = 0
    TypeLess = False
    SQLCursor = True
    ReadOnly = False
    UniDirectional = False
    Active = True
    RawSQL = False
    SQL.Strings = (
      'select * from department order by departmentid')
    UpdateSQL = UpdateSQL
    Left = 48
    Top = 64
  end
  object Datamain: TDataSource
    DataSet = qmain
    Left = 56
    Top = 128
  end
end