📄 yddatam.dfm
字号:
object YDData: TYDData
OldCreateOrder = False
Left = 58
Top = 128
Height = 572
Width = 812
object YYYD: TDatabase
AliasName = 'ydgl_c'
DatabaseName = 'YDDB'
LoginPrompt = False
Params.Strings = (
'USER NAME=SA'
'PASSWORD=')
SessionName = 'Default'
Left = 16
Top = 12
end
object TBczy: TTable
DatabaseName = 'YDDB'
TableName = 'CZYGL'
Left = 16
Top = 76
end
object TBxlcs: TTable
DatabaseName = 'YDDB'
SessionName = 'Default'
TableName = 'xlcs'
Left = 464
Top = 72
end
object DSxlcs: TDataSource
DataSet = TBxlcs
Left = 504
Top = 72
end
object DSczy: TDataSource
DataSet = TBczy
Left = 56
Top = 76
end
object TBmenu: TTable
DatabaseName = 'YDDB'
SessionName = 'Default'
TableName = 'ydmenu'
Left = 64
Top = 10
end
object TBczrz: TTable
DatabaseName = 'YDDB'
SessionName = 'Default'
TableName = 'CZRZ'
Left = 96
Top = 76
end
object DSczrz: TDataSource
DataSet = TBczrz
Left = 136
Top = 76
end
object TBpqdm: TTable
DatabaseName = 'YDDB'
TableName = 'PQDM'
Left = 176
Top = 76
end
object DSpqdm: TDataSource
DataSet = TBpqdm
Left = 216
Top = 76
end
object TBdydj: TTable
DatabaseName = 'YDDB'
TableName = 'dydj'
Left = 272
Top = 6
end
object DSdydj: TDataSource
DataSet = TBdydj
Left = 304
Top = 6
end
object TBhydm: TTable
DatabaseName = 'YDDB'
FieldDefs = <
item
Name = 'hy_id'
DataType = ftAutoInc
end
item
Name = 'hy_hydm'
Attributes = [faFixed]
DataType = ftString
Size = 2
end
item
Name = 'hy_hymc'
Attributes = [faFixed]
DataType = ftString
Size = 40
end
item
Name = 'hy_bz'
Attributes = [faFixed]
DataType = ftString
Size = 16
end>
StoreDefs = True
TableName = 'hydm'
Left = 384
Top = 68
end
object DShydm: TDataSource
DataSet = TBhydm
Left = 424
Top = 68
end
object TBmldj: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.djsjk'
Left = 416
Top = 6
end
object DSmldj: TDataSource
DataSet = TBmldj
Left = 456
Top = 6
end
object TBjjxm: TTable
DatabaseName = 'YDDB'
TableName = 'jjxm'
Left = 408
Top = 142
end
object DSjjxm: TDataSource
DataSet = TBjjxm
Left = 448
Top = 142
end
object TBxtcs: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.XTCS'
Left = 496
Top = 9
end
object DSxtcs: TDataSource
DataSet = TBxtcs
Left = 528
Top = 9
end
object TBydfl: TTable
DatabaseName = 'YDDB'
MasterSource = DSdbda
TableName = 'dbo.YDFL'
Left = 272
Top = 73
end
object DSydfl: TDataSource
DataSet = TBydfl
Left = 312
Top = 73
end
object DSdbda: TDataSource
DataSet = TBdbda
Left = 273
Top = 136
end
object DSyhda: TDataSource
DataSet = TByhda
Left = 193
Top = 136
end
object TBhsdw: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.HSDW'
Left = 112
Top = 8
end
object DShsdw: TDataSource
DataSet = TBhsdw
Left = 152
Top = 8
end
object TBbyqcs: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.BYQCS'
Left = 344
Top = 8
end
object DSbyqcs: TDataSource
DataSet = TBbyqcs
Left = 376
Top = 8
end
object TBgds: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.GDS'
Left = 192
Top = 8
end
object DSgds: TDataSource
DataSet = TBgds
Left = 232
Top = 8
end
object TBdjkp: TTable
DatabaseName = 'YDDB'
IndexFieldNames = 'hhhh;dbbh'
MasterFields = 'hhhh;dbbh'
MasterSource = DSdbda
TableName = 'dbo.DJKP0000'
Left = 313
Top = 136
end
object DSdjkp: TDataSource
DataSet = TBdjkp
Left = 353
Top = 136
end
object TByhda: TTable
DatabaseName = 'YDDB'
IndexFieldNames = 'hhhh'
TableName = 'dbo.YHDA0000'
Left = 153
Top = 136
end
object TBdbda: TTable
DatabaseName = 'YDDB'
IndexFieldNames = 'hhhh'
MasterFields = 'hhhh'
MasterSource = DSyhda
TableName = 'dbo.DBDA0000'
Left = 232
Top = 136
end
object TBfjjj: TTable
DatabaseName = 'YDDB'
IndexFieldNames = 'FJ_HHHH'
MasterFields = 'hhhh'
MasterSource = DSyhda
TableName = 'dbo.FJJJ0000'
Left = 24
Top = 144
end
object DSfjjj: TDataSource
DataSet = TBfjjj
Left = 72
Top = 144
end
object TBtjgx: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.JXGX0000'
Left = 32
Top = 200
end
object DStjgx: TDataSource
DataSet = TBtjgx
Left = 80
Top = 200
end
object TBdb: TTable
DatabaseName = 'YDDB'
IndexFieldNames = 'hhhh'
MasterFields = 'hhhh'
MasterSource = DSyh
TableName = 'dbo.DBDA0000'
Left = 304
Top = 208
end
object DSyh: TDataSource
DataSet = QUyh
Left = 256
Top = 208
end
object QUyh: TQuery
DatabaseName = 'YDDB'
SQL.Strings = (
'select * from YHDA0000 order by hhhh')
Left = 216
Top = 208
end
object TBcbysz: TTable
DatabaseName = 'YDDB'
TableName = 'dbo.CBYK'
Left = 128
Top = 208
end
object DScbysz: TDataSource
DataSet = TBcbysz
Left = 168
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -