📄 datamodule.dfm
字号:
object DataModule1: TDataModule1
OldCreateOrder = False
Left = 50
Top = 206
Height = 413
Width = 780
object rsbm: TTable
Active = True
DatabaseName = 'rong'
TableName = 'rsbm.db'
Left = 72
Top = 8
end
object whzd: TTable
Active = True
DatabaseName = 'rong'
TableName = 'whzd.db'
Left = 8
Top = 8
end
object mzsz: TTable
Active = True
DatabaseName = 'rong'
TableName = 'mzsz.db'
Left = 40
Top = 8
end
object zcsz: TTable
Active = True
DatabaseName = 'rong'
TableName = 'zcsz.db'
Left = 104
Top = 8
end
object zwsz: TTable
Active = True
DatabaseName = 'rong'
TableName = 'zwsz.db'
Left = 136
Top = 8
end
object gn: TTable
Active = True
DatabaseName = 'rong'
TableName = 'gn.db'
Left = 168
Top = 8
end
object yggb: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from yggb')
UpdateObject = yggbu
Left = 168
Top = 56
end
object rsbms: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from rsbm.db')
Left = 72
Top = 56
end
object whzds: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from whzd.db')
Left = 8
Top = 56
end
object mzszs: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from mzsz.db')
Left = 40
Top = 56
end
object zcszs: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from zcsz.db')
Left = 104
Top = 56
end
object zwszs: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from zwsz.db')
Left = 136
Top = 56
end
object yggbb: TTable
Active = True
DatabaseName = 'rong'
TableName = 'yggb.DB'
Left = 200
Top = 56
end
object ggjs: TTable
Active = True
DatabaseName = 'rong'
TableName = 'ggjs.db'
Left = 8
Top = 112
end
object gzgn: TTable
Active = True
DatabaseName = 'rong'
TableName = 'gzgn.db'
Left = 88
Top = 112
end
object ggjss: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from ggjs')
Left = 48
Top = 112
end
object gzgns: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from gzgn')
Left = 128
Top = 112
end
object gzgnu: TUpdateSQL
ModifySQL.Strings = (
'update gzgn set a=b+c+d')
Left = 168
Top = 112
end
object gpgz: TTable
Active = True
DatabaseName = 'rong'
TableName = 'gpgz.db'
Left = 8
Top = 168
end
object gpgzs: TQuery
Active = True
AutoRefresh = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from gpgz')
UpdateObject = gpgzu
Left = 48
Top = 168
end
object gpgzu: TUpdateSQL
DeleteSQL.Strings = (
'')
Left = 88
Top = 168
end
object qqsd: TTable
Active = True
DatabaseName = 'rong'
TableName = 'qqsd.db'
Left = 48
Top = 224
end
object qqdj: TTable
Active = True
DatabaseName = 'rong'
TableName = 'qqdj.DB'
Left = 8
Top = 224
end
object qqdjs: TQuery
Active = True
AutoRefresh = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from qqdj')
UpdateObject = qqdju
Left = 88
Top = 224
end
object qqdju: TUpdateSQL
Left = 120
Top = 171
end
object qjdj: TTable
Active = True
DatabaseName = 'rong'
TableName = 'qjdj.db'
Left = 8
Top = 288
end
object qjdjs: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from qjdj')
Left = 48
Top = 288
end
object npdj: TTable
Active = True
DatabaseName = 'rong'
TableName = 'npdj.db'
Left = 88
Top = 288
end
object yjb: TTable
Active = True
DatabaseName = 'rong'
TableName = 'yjb.db'
Left = 56
Top = 344
end
object yjsd: TTable
Active = True
DatabaseName = 'rong'
TableName = 'yjsd.db'
Left = 136
Top = 344
end
object htgn: TTable
Active = True
DatabaseName = 'rong'
TableName = 'htgn.db'
Left = 176
Top = 344
end
object yjbs: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from yjb')
UpdateObject = yjbu
Left = 16
Top = 344
end
object yjbu: TUpdateSQL
Left = 96
Top = 344
end
object htgns: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from htgn')
UpdateObject = htgnu
Left = 216
Top = 344
end
object gns: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from gn')
Left = 256
Top = 174
end
object ggjsn: TTable
Active = True
DatabaseName = 'rong'
TableName = 'ggjsn.DB'
Left = 200
Top = 112
end
object gzgnn: TTable
Active = True
DatabaseName = 'rong'
TableName = 'gzgnn.DB'
Left = 240
Top = 112
end
object gzgnss: TQuery
Active = True
CachedUpdates = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from gzgn')
UpdateObject = gzgnu
Left = 280
Top = 112
end
object gztj: TTable
Active = True
DatabaseName = 'rong'
TableName = 'gztj.db'
Left = 320
Top = 112
end
object htgnu: TUpdateSQL
Left = 184
Top = 294
end
object gztjs: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from gztj')
UpdateObject = gztju
Left = 352
Top = 112
end
object gztju: TUpdateSQL
Left = 384
Top = 112
end
object npdjs: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from npdj')
UpdateObject = npdju
Left = 168
Top = 171
end
object npdju: TUpdateSQL
Left = 200
Top = 171
end
object yggbu: TUpdateSQL
Left = 240
Top = 56
end
object rsbmss: TQuery
Active = True
DatabaseName = 'rong'
SQL.Strings = (
'select *from rsbm')
Left = 208
Top = 8
end
object passs: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from pass')
UpdateObject = passu
Left = 144
Top = 224
end
object passu: TUpdateSQL
Left = 192
Top = 224
end
object user: TQuery
Active = True
DatabaseName = 'rong'
RequestLive = True
SQL.Strings = (
'select *from a_user')
UpdateObject = useru
Left = 248
Top = 8
end
object useru: TUpdateSQL
Left = 288
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -