⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit2.~dfm

📁 < SQL SERVER 2000 案例教程>>,冶金工业出版社,这本书的代码
💻 ~DFM
字号:
object mydata: Tmydata
  OldCreateOrder = False
  Left = 308
  Top = 283
  Height = 315
  Width = 375
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 16
    Top = 80
  end
  object Query1: TQuery
    DatabaseName = #32771#21220#31995#32479
    Left = 144
    Top = 96
  end
  object Database1: TDatabase
    AliasName = #32771#21220#31995#32479
    Connected = True
    DatabaseName = #32771#21220#31995#32479
    LoginPrompt = False
    Params.Strings = (
      'DATABASE NAME='#32771#21220#31995#32479
      'ODBC DSN='#32771#21220#31995#32479
      'OPEN MODE=READ/WRITE'
      'SCHEMA CACHE SIZE=8'
      'SQLQRYMODE='
      'LANGDRIVER='
      'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
      'SCHEMA CACHE TIME=-1'
      'MAX ROWS=-1'
      'BATCH COUNT=200'
      'ENABLE SCHEMA CACHE=FALSE'
      'SCHEMA CACHE DIR='
      'ENABLE BCD=FALSE'
      'ROWSET SIZE=20'
      'BLOBS TO CACHE=64'
      'PASSWORD='
      'USER NAME=sa')
    SessionName = 'Default'
    Left = 96
    Top = 16
  end
  object Query_power: TQuery
    DatabaseName = #32771#21220#31995#32479
    Left = 88
    Top = 128
  end
  object Query_time: TQuery
    DatabaseName = #32771#21220#31995#32479
    Left = 224
    Top = 136
  end
  object Query2: TQuery
    DatabaseName = #32771#21220#31995#32479
    SQL.Strings = (
      'select * from '#19978#19979#29677#26102#38388#34920)
    Left = 232
    Top = 88
  end
  object Query3: TQuery
    DatabaseName = #32771#21220#31995#32479
    Left = 152
    Top = 200
  end
  object Query4: TQuery
    DatabaseName = #32771#21220#31995#32479
    SQL.Strings = (
      'select * from '#32771#21220#34920)
    Left = 240
    Top = 208
  end
  object DataSource4: TDataSource
    DataSet = Query4
    Left = 48
    Top = 208
  end
  object DataSource5: TDataSource
    DataSet = Query5
    Left = 184
    Top = 40
  end
  object Query5: TQuery
    DatabaseName = #32771#21220#31995#32479
    SQL.Strings = (
      'select * from '#26085#24535#34920)
    Left = 304
    Top = 136
  end
  object SaveDialog1: TSaveDialog
    Left = 280
    Top = 32
  end
  object Query6: TQuery
    Active = True
    DatabaseName = #32771#21220#31995#32479
    SQL.Strings = (
      'select * from '#29992#25143#23494#30721#34920' where '#26435#38480#31867#22411'='#39'user'#39)
    Left = 120
    Top = 248
  end
  object DataSource2: TDataSource
    DataSet = Query6
    Left = 32
    Top = 16
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -