📄 c_ldkr.dfm
字号:
end
object qryKrxxD_YWM: TStringField
FieldName = 'D_YWM'
Origin = 'LFHOTELUSER.KRXXDA.D_YWM'
Size = 8
end
object qryKrxxD_XB: TStringField
FieldName = 'D_XB'
Origin = 'LFHOTELUSER.KRXXDA.D_XB'
Size = 2
end
object qryKrxxD_MZBH: TStringField
FieldName = 'D_MZBH'
Origin = 'LFHOTELUSER.KRXXDA.D_MZBH'
Size = 5
end
object qryKrxxD_DQBH: TStringField
FieldName = 'D_DQBH'
Origin = 'LFHOTELUSER.KRXXDA.D_DQBH'
Size = 5
end
object qryKrxxD_GBBH: TStringField
FieldName = 'D_GBBH'
Origin = 'LFHOTELUSER.KRXXDA.D_GBBH'
Size = 5
end
object qryKrxxD_NZTS: TIntegerField
FieldName = 'D_NZTS'
Origin = 'LFHOTELUSER.KRXXDA.D_NZTS'
end
object qryKrxxD_TLSY: TStringField
FieldName = 'D_TLSY'
Origin = 'LFHOTELUSER.KRXXDA.D_TLSY'
Size = 10
end
object qryKrxxD_ZJBH: TStringField
FieldName = 'D_ZJBH'
Origin = 'LFHOTELUSER.KRXXDA.D_ZJBH'
Size = 5
end
object qryKrxxD_ZJHM: TStringField
FieldName = 'D_ZJHM'
Origin = 'LFHOTELUSER.KRXXDA.D_ZJHM'
Size = 18
end
object qryKrxxD_CSNY: TDateTimeField
FieldName = 'D_CSNY'
Origin = 'LFHOTELUSER.KRXXDA.D_CSNY'
end
object qryKrxxD_HCL: TStringField
FieldName = 'D_HCL'
Origin = 'LFHOTELUSER.KRXXDA.D_HCL'
Size = 10
end
object qryKrxxD_HCQ: TStringField
FieldName = 'D_HCQ'
Origin = 'LFHOTELUSER.KRXXDA.D_HCQ'
Size = 10
end
object qryKrxxD_QZBH: TStringField
FieldName = 'D_QZBH'
Origin = 'LFHOTELUSER.KRXXDA.D_QZBH'
Size = 5
end
object qryKrxxD_QZYXQ: TDateTimeField
FieldName = 'D_QZYXQ'
Origin = 'LFHOTELUSER.KRXXDA.D_QZYXQ'
end
object qryKrxxD_ZY: TStringField
FieldName = 'D_ZY'
Origin = 'LFHOTELUSER.KRXXDA.D_ZY'
Size = 10
end
object qryKrxxD_LXDH: TStringField
FieldName = 'D_LXDH'
Origin = 'LFHOTELUSER.KRXXDA.D_LXDH'
Size = 16
end
object qryKrxxD_DWMC: TStringField
FieldName = 'D_DWMC'
Origin = 'LFHOTELUSER.KRXXDA.D_DWMC'
Size = 30
end
object qryKrxxD_JTDZ: TStringField
FieldName = 'D_JTDZ'
Origin = 'LFHOTELUSER.KRXXDA.D_JTDZ'
Size = 30
end
object qryKrxxD_JDR: TStringField
FieldName = 'D_JDR'
Origin = 'LFHOTELUSER.KRXXDA.D_JDR'
Size = 8
end
object qryKrxxD_JDDW: TStringField
FieldName = 'D_JDDW'
Origin = 'LFHOTELUSER.KRXXDA.D_JDDW'
Size = 30
end
object qryKrxxD_BZ: TStringField
FieldName = 'D_BZ'
Origin = 'LFHOTELUSER.KRXXDA.D_BZ'
Size = 30
end
object qryKrxxD_QDR1: TStringField
FieldName = 'D_QDR1'
Origin = 'LFHOTELUSER.KRXXDA.D_QDR1'
Size = 8
end
object qryKrxxD_QDR2: TStringField
FieldName = 'D_QDR2'
Origin = 'LFHOTELUSER.KRXXDA.D_QDR2'
Size = 8
end
object qryKrxxD_QDR3: TStringField
FieldName = 'D_QDR3'
Origin = 'LFHOTELUSER.KRXXDA.D_QDR3'
Size = 8
end
object qryKrxxD_QDR4: TStringField
FieldName = 'D_QDR4'
Origin = 'LFHOTELUSER.KRXXDA.D_QDR4'
Size = 8
end
object qryKrxxD_KFBH: TStringField
FieldName = 'D_KFBH'
Origin = 'LFHOTELUSER.KRZDDA.D_KFBH'
Size = 5
end
object qryKrxxD_SJFJ: TFloatField
FieldName = 'D_SJFJ'
Origin = 'LFHOTELUSER.KRZDDA.D_SJFJ'
DisplayFormat = '#.##'
end
end
object dsKrxx: TDataSource
DataSet = qryKrxx
Left = 432
Top = 24
end
object DosMove1: TDosMove
Active = True
Left = 152
Top = 8
end
object qryKrzd: TQuery
DatabaseName = 'LfHotelUser'
DataSource = dsKrxx
SQL.Strings = (
'select * from KRZDDA where (D_KRBH=:D_KRBH)and(D_HH<>0)')
Left = 488
Top = 24
ParamData = <
item
DataType = ftString
Name = 'D_KRBH'
ParamType = ptUnknown
Size = 13
end>
object qryKrzdD_ZDBH: TStringField
FieldName = 'D_ZDBH'
Origin = 'LFHOTELUSER.KRZDDA.D_ZDBH'
Size = 12
end
object qryKrzdD_HH: TIntegerField
FieldName = 'D_HH'
Origin = 'LFHOTELUSER.KRZDDA.D_HH'
end
object qryKrzdD_ZDLB: TStringField
FieldName = 'D_ZDLB'
Origin = 'LFHOTELUSER.KRZDDA.D_ZDLB'
FixedChar = True
Size = 1
end
object qryKrzdD_KRBH: TStringField
FieldName = 'D_KRBH'
Origin = 'LFHOTELUSER.KRZDDA.D_KRBH'
Size = 12
end
object qryKrzdD_YJBH: TStringField
FieldName = 'D_YJBH'
Origin = 'LFHOTELUSER.KRZDDA.D_YJBH'
Size = 12
end
object qryKrzdD_KFBH: TStringField
FieldName = 'D_KFBH'
Origin = 'LFHOTELUSER.KRZDDA.D_KFBH'
Size = 5
end
object qryKrzdD_SJFJ: TFloatField
FieldName = 'D_SJFJ'
Origin = 'LFHOTELUSER.KRZDDA.D_SJFJ'
end
object qryKrzdD_XMBH: TStringField
FieldName = 'D_XMBH'
Origin = 'LFHOTELUSER.KRZDDA.D_XMBH'
Size = 5
end
object qryKrzdD_XFDJ: TFloatField
FieldName = 'D_XFDJ'
Origin = 'LFHOTELUSER.KRZDDA.D_XFDJ'
end
object qryKrzdD_XFSL: TFloatField
FieldName = 'D_XFSL'
Origin = 'LFHOTELUSER.KRZDDA.D_XFSL'
end
object qryKrzdD_XFJE: TFloatField
FieldName = 'D_XFJE'
Origin = 'LFHOTELUSER.KRZDDA.D_XFJE'
DisplayFormat = '#.##'
end
object qryKrzdD_XFRQ: TDateTimeField
FieldName = 'D_XFRQ'
Origin = 'LFHOTELUSER.KRZDDA.D_XFRQ'
DisplayFormat = 'yyyy-mm-dd'
end
object qryKrzdD_XFSJ: TDateTimeField
FieldName = 'D_XFSJ'
Origin = 'LFHOTELUSER.KRZDDA.D_XFSJ'
end
object qryKrzdD_YHJE: TFloatField
FieldName = 'D_YHJE'
Origin = 'LFHOTELUSER.KRZDDA.D_YHJE'
end
object qryKrzdD_JZRQ: TDateTimeField
FieldName = 'D_JZRQ'
Origin = 'LFHOTELUSER.KRZDDA.D_JZRQ'
end
object qryKrzdD_JZSJ: TDateTimeField
FieldName = 'D_JZSJ'
Origin = 'LFHOTELUSER.KRZDDA.D_JZSJ'
end
object qryKrzdD_JZBZ: TStringField
FieldName = 'D_JZBZ'
Origin = 'LFHOTELUSER.KRZDDA.D_JZBZ'
FixedChar = True
Size = 1
end
object qryKrzdD_JSBZ: TStringField
FieldName = 'D_JSBZ'
Origin = 'LFHOTELUSER.KRZDDA.D_JSBZ'
FixedChar = True
Size = 1
end
object qryKrzdD_DLR1: TStringField
FieldName = 'D_DLR1'
Origin = 'LFHOTELUSER.KRZDDA.D_DLR1'
Size = 8
end
object qryKrzdD_DLR2: TStringField
FieldName = 'D_DLR2'
Origin = 'LFHOTELUSER.KRZDDA.D_DLR2'
Size = 8
end
object qryKrzdD_DLR3: TStringField
FieldName = 'D_DLR3'
Origin = 'LFHOTELUSER.KRZDDA.D_DLR3'
Size = 8
end
object qryKrzdD_DLR4: TStringField
FieldName = 'D_DLR4'
Origin = 'LFHOTELUSER.KRZDDA.D_DLR4'
Size = 8
end
object qryKrzdD_CZYXM: TStringField
FieldName = 'D_CZYXM'
Origin = 'LFHOTELUSER.KRZDDA.D_CZYXM'
Size = 8
end
object qryKrzdD_JZYXM: TStringField
FieldName = 'D_JZYXM'
Origin = 'LFHOTELUSER.KRZDDA.D_JZYXM'
Size = 8
end
object qryKrzdD_TYR: TStringField
FieldName = 'D_TYR'
Origin = 'LFHOTELUSER.KRZDDA.D_TYR'
Size = 8
end
object qryKrzdD_BZ: TStringField
FieldName = 'D_BZ'
Origin = 'LFHOTELUSER.KRZDDA.D_BZ'
Size = 30
end
object qryKrzdD_YSRQ: TStringField
FieldName = 'D_YSRQ'
Origin = 'LFHOTELUSER.KRZDDA.D_YSRQ'
Size = 8
end
object qryKrzdD_JZBH: TStringField
FieldName = 'D_JZBH'
Origin = 'LFHOTELUSER.KRZDDA.D_JZBH'
Size = 12
end
object qryKrzdD_BMBH: TStringField
FieldName = 'D_BMBH'
Origin = 'LFHOTELUSER.KRZDDA.D_BMBH'
Size = 5
end
object qryKrzdD_XMMC: TStringField
FieldKind = fkLookup
FieldName = 'D_XMMC'
LookupDataSet = HotelData.tblXMDM
LookupKeyFields = 'D_XMBH'
LookupResultField = 'D_XMMC'
KeyFields = 'D_XMBH'
Lookup = True
end
end
object dsKrzd: TDataSource
DataSet = qryKrzd
Left = 520
Top = 24
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -