📄 unit_queryindiservice.dfm
字号:
Title.Alignment = taCenter
Title.Caption = '局向'
Width = 32
Visible = True
end
item
Expanded = False
FieldName = 'BE_DH_T'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '成为大客户'
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'XB_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '性别'
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'AGE'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '年龄'
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'XYD'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '单停信用点'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'SDATE'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '开户时间'
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'VIP_NO_C'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = 'VIP卡号'
Width = 92
Visible = True
end>
end
inherited dbgJT: TDBGrid
Columns = <
item
Expanded = False
FieldName = 'row_num'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '序号'
Width = 39
Visible = True
end
item
Expanded = False
FieldName = 'JTYHMC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '集团用户名称'
Width = 160
Visible = True
end
item
Expanded = False
FieldName = 'HYDM_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '所属行业'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'JTLB_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '集团类别'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'GROUPFLAG_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '集团属性'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'TYPECODE_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务类型'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'SERVKIND_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务性质'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'FINISH_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '完成标志'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'QUALITYCODE_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务质量'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'BEGINTIME'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '开始时间'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ENDTIME'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '结束时间'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'MODECODE_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务方式'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'OBJADVICE'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '用户意见'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Rate'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '优惠比率'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Amount'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '优惠数量'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Tax'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '税收金额'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ServCont'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务内容'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'UseIntegral'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '所需积分'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ObjAdvice'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '客户意见'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ObjInfo'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '获得的信息'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ServMoney'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '服务金额'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'UseMoney'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '耗费金额'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'TotalMoney'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '合计金额'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'CITYNO_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '地市'
Width = 32
Visible = True
end
item
Expanded = False
FieldName = 'JX_DESC'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '局向'
Width = 37
Visible = True
end
item
Expanded = False
FieldName = 'SID_G'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '电话'
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'GH_G'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '工号'
Visible = True
end
item
Expanded = False
FieldName = 'BE_G_DATE'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '成为大客户'
Width = 73
Visible = True
end
item
Expanded = False
FieldName = 'JTCY'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '成员数'
Width = 45
Visible = True
end
item
Expanded = False
FieldName = 'VIP_NO_G'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = 'VIP卡号'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'JTYHDM_G'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '集团用户代码'
Width = 88
Visible = True
end
item
Expanded = False
FieldName = 'ADDR'
PickList.Strings = ()
Title.Alignment = taCenter
Title.Caption = '联系地址'
Width = 80
Visible = True
end>
end
end
inherited browse_normal: TQuery
SQL.Strings = (
'select * from T_V_GR_queryindiservice')
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -