datarsgl.~dfm
来自「毕业设计时候开发的人事管理系统」· ~DFM 代码 · 共 153 行
~DFM
153 行
object dmrsgl: Tdmrsgl
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 224
Top = 288
Height = 275
Width = 402
object adorsgl: TADOConnection
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 16
Top = 8
end
object companyqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from companytb')
Left = 64
Top = 8
end
object userqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from usertb')
Left = 112
Top = 8
end
object ygjbzlqry: TADOQuery
Connection = adorsgl
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from employeer')
Left = 160
Top = 8
end
object ygsjgzzlqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygsjgztb')
Left = 288
Top = 16
end
object ygkqtbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygsbtb')
Left = 16
Top = 72
end
object kqsettimeqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from kqsettime')
Left = 80
Top = 72
end
object adorsgl1: TADOConnection
ConnectionString =
'FILE NAME=C:\Program Files\Common Files\System\Ole DB\Data Links' +
'\rsgl.udl'
Provider = 'C:\Program Files\Common Files\System\Ole DB\Data Links\rsgl.udl'
Left = 136
Top = 72
end
object ygbmqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygbmtb')
Left = 184
Top = 72
end
object ygmovetbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygmovetb')
Left = 296
Top = 72
end
object ygwptbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygwptb')
Left = 232
Top = 72
end
object ygcttbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygcttb')
Left = 16
Top = 120
end
object ygkqywtbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from ygkqywtb')
Left = 80
Top = 120
end
object ADOqry_duteinfo: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from duteinfo')
Left = 160
Top = 120
end
object adogzffbzqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from gzffbz')
Left = 232
Top = 120
end
object adtxtimeqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from txdate')
Left = 312
Top = 128
end
object ygmonthgzqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from monthgz')
Left = 224
Top = 8
end
object yeargztbqry: TADOQuery
Connection = adorsgl
Parameters = <>
SQL.Strings = (
'select * from yeargztb')
Left = 16
Top = 176
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?