sql server 中定义的是 text类型,我的目的是把数据导出成一张表格(excel, 或其他文件)。
无奈richtext 数据在 richtext 控件中显示得漂亮。但是脱离richtext ,没招了。
我希望保留在窗口程序中继续以richtext方式显示不变且可以随心所欲地转换成txt方式供文件共享使用。实现中我希望使用函数转换直接搞定最好。
多谢!
------解决方案--------------------
老弟,这个转换很简单的。你想复杂了。你先把richtext格式的字符串写入ritext控件,再从richtext里copy出来,就只有纯字符串,没格式了。
string sDescribe,ssss
BLOB blob_doc
select Describe into :sDescribe from t_describe where sitcode = :code;
selectblob Describe into :blob_doc from t_describe where sitcode = :code;
ricchtextedit lu_rte
singlelineedit lu_sle
w_name.openuserobject(lu_rte)
w_name.openuserobject(lu_sle)
lu_rte.pastertf(sDescribe)
lu_rte.selectalltext()
lu_rte.copy()
lu_sle.paset()
return lu_sle.text
没测试,而且有些细节没处理,自己完善下吧
------解决方案--------------------