?? dm.dfm
字號:
object Frmdm: TFrmdm
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 21
Top = 107
Height = 375
Width = 715
object Database: TDatabase
AliasName = 'yygl'
DatabaseName = 'yygl'
LoginPrompt = False
Params.Strings = (
'user name='#39#39
'password='#39#39)
SessionName = 'Default'
TransIsolation = tiRepeatableRead
Left = 96
Top = 24
end
object Query_gettime: TQuery
DatabaseName = 'yygl'
Left = 96
Top = 80
end
object Query_czy: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 16
Top = 80
end
object Query_bm: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 160
Top = 80
end
object DataSource_bm: TDataSource
DataSet = Query_bm
Left = 160
Top = 128
end
object Query_bhb: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 216
Top = 80
end
object DataSource_ghs: TDataSource
DataSet = Query_ghs
Left = 264
Top = 128
end
object Query_ghs: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 264
Top = 80
end
object Query_ywy: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 320
Top = 80
object Query_ywyywy_bh: TStringField
FieldName = 'ywy_bh'
Origin = 'YYGL.ywyb.ywy_bh'
Size = 3
end
object Query_ywyywy_xm: TStringField
FieldName = 'ywy_xm'
Origin = 'YYGL.ywyb.ywy_xm'
Size = 8
end
object Query_ywyxb: TStringField
FieldName = 'xb'
Origin = 'YYGL.ywyb.xb'
Size = 2
end
object Query_ywynl: TStringField
FieldName = 'nl'
Origin = 'YYGL.ywyb.nl'
Size = 2
end
object Query_ywybm_bh: TStringField
FieldName = 'bm_bh'
Origin = 'YYGL.ywyb.bm_bh'
Size = 2
end
object Query_ywybm_mc: TStringField
FieldKind = fkLookup
FieldName = 'bm_mc'
LookupDataSet = Query_bm
LookupKeyFields = 'bm_bh'
LookupResultField = 'bm_mc'
KeyFields = 'bm_bh'
Size = 10
Lookup = True
end
end
object DataSource_ywy: TDataSource
DataSet = Query_ywy
Left = 320
Top = 128
end
object Query_dbdw: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 368
Top = 80
end
object DataSource_dbdw: TDataSource
DataSet = Query_dbdw
Left = 368
Top = 128
end
object DataSource_khxx: TDataSource
DataSet = Query_khxx
Left = 24
Top = 240
end
object Query_khxx: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 24
Top = 184
end
object Query_kc: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 88
Top = 184
end
object DataSource_kc: TDataSource
DataSet = Query_kc
Left = 96
Top = 240
end
object Query_ckxx: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 152
Top = 16
end
object Query_db: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 216
Top = 184
object Query_dbdb_bh: TStringField
FieldName = 'db_bh'
Origin = 'YYGL.dbxxb.db_bh'
Size = 22
end
object Query_dbcd: TStringField
FieldName = 'cd'
Origin = 'YYGL.dbxxb.cd'
end
object Query_dbpm: TStringField
FieldName = 'pm'
Origin = 'YYGL.dbxxb.pm'
end
object Query_dbgg: TStringField
FieldName = 'gg'
Origin = 'YYGL.dbxxb.gg'
Size = 10
end
object Query_dbdw2: TStringField
FieldName = 'dw'
Origin = 'YYGL.dbxxb.dw'
Size = 4
end
object Query_dbph: TStringField
FieldName = 'ph'
Origin = 'YYGL.dbxxb.ph'
end
object Query_dbjj: TFloatField
FieldName = 'jj'
Origin = 'YYGL.dbxxb.jj'
end
object Query_dbdbsl: TFloatField
FieldName = 'dbsl'
Origin = 'YYGL.dbxxb.dbsl'
end
object Query_dbje: TFloatField
FieldName = 'je'
Origin = 'YYGL.dbxxb.je'
end
object Query_dbdbrq: TDateTimeField
FieldName = 'dbrq'
Origin = 'YYGL.dbxxb.dbrq'
DisplayFormat = 'yyyy-mm-dd'
end
object Query_dbdbdw: TStringField
FieldName = 'dbdw'
Origin = 'YYGL.dbxxb.dbdw'
end
object Query_dbfpph: TStringField
FieldName = 'fpph'
Origin = 'YYGL.dbxxb.fpph'
Size = 14
end
object Query_dbck_bh: TStringField
FieldName = 'ck_bh'
Origin = 'YYGL.dbxxb.ck_bh'
Size = 1
end
object Query_dbck_mc: TStringField
FieldKind = fkLookup
FieldName = 'ck_mc'
LookupDataSet = Query_ckxx
LookupKeyFields = 'ck_bh'
LookupResultField = 'ck_mc'
KeyFields = 'ck_bh'
Size = 10
Lookup = True
end
object Query_dbwp_bm: TStringField
FieldName = 'wp_bm'
Origin = 'YYGL.dbxxb.wp_bm'
Size = 5
end
end
object DataSource_db: TDataSource
DataSet = Query_db
Left = 216
Top = 248
end
object Query_xs: TQuery
OnCalcFields = Query_xsCalcFields
DatabaseName = 'yygl'
RequestLive = True
Left = 272
Top = 184
object Query_xsxs_bh: TStringField
FieldName = 'xs_bh'
Origin = 'YYGL.xsxxb.xs_bh'
Size = 22
end
object Query_xswp_bm: TStringField
FieldName = 'wp_bm'
Origin = 'YYGL.xsxxb.wp_bm'
Size = 5
end
object Query_xskh_mc: TStringField
FieldName = 'kh_mc'
Origin = 'YYGL.xsxxb.kh_mc'
end
object Query_xspm: TStringField
FieldName = 'pm'
Origin = 'YYGL.xsxxb.pm'
end
object Query_xsdw: TStringField
FieldName = 'dw'
Origin = 'YYGL.xsxxb.dw'
Size = 4
end
object Query_xsgg: TStringField
FieldName = 'gg'
Origin = 'YYGL.xsxxb.gg'
Size = 10
end
object Query_xsjj: TFloatField
FieldName = 'jj'
Origin = 'YYGL.xsxxb.jj'
end
object Query_xsdj: TFloatField
FieldName = 'dj'
Origin = 'YYGL.xsxxb.dj'
end
object Query_xssl: TFloatField
FieldName = 'sl'
Origin = 'YYGL.xsxxb.sl'
end
object Query_xsje: TFloatField
FieldName = 'je'
Origin = 'YYGL.xsxxb.je'
end
object Query_xsfp_ph: TStringField
FieldName = 'fp_ph'
Origin = 'YYGL.xsxxb.fp_ph'
Size = 14
end
object Query_xscb: TFloatField
FieldKind = fkCalculated
FieldName = 'cb'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xssj: TFloatField
FieldKind = fkCalculated
FieldName = 'sj'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xsml: TFloatField
FieldKind = fkCalculated
FieldName = 'ml'
Calculated = True
end
object Query_xslr: TFloatField
FieldKind = fkCalculated
FieldName = 'lr'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xsph: TStringField
FieldName = 'ph'
Origin = 'YYGL.xsxxb.ph'
end
object Query_xsxsrq: TDateTimeField
FieldName = 'xsrq'
Origin = 'YYGL.xsxxb.xsrq'
DisplayFormat = 'yyyy-mm-dd'
end
object Query_xsck_bh: TStringField
FieldName = 'ck_bh'
Origin = 'YYGL.xsxxb.ck_bh'
Size = 1
end
object Query_xsbm_mc: TStringField
FieldName = 'bm_mc'
Origin = 'YYGL.xsxxb.bm_mc'
Size = 10
end
object Query_xsywy_xm: TStringField
FieldName = 'ywy_xm'
Origin = 'YYGL.xsxxb.ywy_xm'
Size = 8
end
object Query_xscd: TStringField
FieldName = 'cd'
Origin = 'YYGL.xsxxb.cd'
end
object Query_xsck_mc: TStringField
FieldKind = fkLookup
FieldName = 'ck_mc'
LookupDataSet = Query_ckxx
LookupKeyFields = 'ck_bh'
LookupResultField = 'ck_mc'
KeyFields = 'ck_bh'
Size = 10
Lookup = True
end
object Query_xssb: TStringField
FieldName = 'sb'
Origin = 'YYGL.xsxxb.sb'
Size = 10
end
object Query_xspzwh: TStringField
FieldName = 'pzwh'
Origin = 'YYGL.xsxxb.pzwh'
Size = 30
end
end
object DataSource_xs: TDataSource
DataSet = Query_xs
Left = 272
Top = 248
end
object Query_ckd: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 320
Top = 184
end
object Query_bs: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 376
Top = 192
end
object DataSource_bs: TDataSource
DataSet = Query_bs
Left = 376
Top = 248
end
object DataSource_ckxx: TDataSource
DataSet = Query_ckxx
Left = 272
Top = 24
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -