?? uquery.dfm
字號:
object xzBooksQuery: TxzBooksQuery
OldCreateOrder = False
Pooled = False
Left = 193
Top = 132
Height = 412
Width = 416
object ADOConnection1: TADOConnection
KeepConnection = False
LoginPrompt = False
Mode = cmRead
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 80
Top = 16
end
object adsUerBooks: TADODataSet
Connection = ADOConnection1
CommandText = 'select JYR,BookName,DJ,CS from '#20511#20070#34920' where JYRDH=:aid'
Parameters = <
item
Name = 'aid'
DataType = ftString
Size = 1
Value = '0'
end>
Left = 56
Top = 88
end
object adsBooksFromJSB: TADODataSet
Connection = ADOConnection1
CommandText = 'Select BookName,JYR,DJ,CS from '#20511#20070#34920' where BookID=:aid'
Parameters = <
item
Name = 'aid'
DataType = ftString
Size = 1
Value = '0'
end>
Left = 152
Top = 88
end
object adsBooksFromBooks: TADODataSet
Connection = ADOConnection1
CommandText =
'select Name,Author,Pub,Money,RKRQ,YJC,Times from '#22270#20070#24211' where id=:a' +
'id'
Parameters = <
item
Name = 'aid'
DataType = ftString
Size = 1
Value = '0'
end>
Left = 272
Top = 88
end
object dspUserBooks: TDataSetProvider
DataSet = adsUerBooks
Constraints = True
ResolveToDataSet = True
Options = [poAllowCommandText]
Left = 56
Top = 160
end
object dspBooksFromJSB: TDataSetProvider
DataSet = adsBooksFromJSB
Constraints = True
ResolveToDataSet = True
Options = [poAllowCommandText]
Left = 152
Top = 160
end
object dspBooksFromBooks: TDataSetProvider
DataSet = adsBooksFromBooks
Constraints = True
ResolveToDataSet = True
Options = [poAllowCommandText]
Left = 272
Top = 160
end
object adoUser: TADODataSet
Connection = ADOConnection1
CommandText = 'Select top :Number * from User where ID=:aid'
Parameters = <
item
Name = 'Number'
Size = -1
Value = Null
end
item
Name = 'aid'
DataType = ftString
Size = 1
Value = '0'
end>
Left = 152
Top = 248
end
object dspUser: TDataSetProvider
DataSet = adoUser
Constraints = True
Left = 152
Top = 304
end
object adsJSB: TADODataSet
Connection = ADOConnection1
CommandText = 'select top :Number JYR,BookName,DJ,CS from '#20511#20070#34920' where id=:aid'
Parameters = <
item
Name = 'Number'
Size = -1
Value = Null
end
item
Name = 'aid'
DataType = ftString
Size = 2
Value = '-1'
end>
Left = 56
Top = 248
end
object adsBooks: TADODataSet
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
Left = 272
Top = 248
end
object dspJSB: TDataSetProvider
DataSet = adsJSB
Constraints = True
Left = 56
Top = 312
end
object dspBooks: TDataSetProvider
DataSet = adsBooks
Constraints = True
ResolveToDataSet = True
Options = [poAllowCommandText]
Left = 272
Top = 312
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -