如何用DELPHI编程实现如下功能 如何用DELPHI编程实现如下功能由于最近编程是用系统自带的控件listBoX和MEMO,但是感觉上老是不舒服,在“贵论坛”发帖子好时间了,但是感觉这个如下图的控件,在DELPHI如何实现 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 并且由这个控件内的所有信息都保存到MSSQL数据库AA表中的aaB并且aaB的字段的属性为:text 我看了一下这个“实例”,在RichEdit控件中录入信息后,为了区分,我在几行数据中分别设置了字号字体颜色等,我又根据“实例”进行保存时以TXT文本方式保存,用系统中的“记事本”打开是全是“乱码”, 而用RichEdit实例打开时,就是明码,可是RichEdit实例程序中没有保存RichEdit内信息特殊代码呀,我怎么看不懂呀????这个RichEdit在保存时,如何转换的呀???? rtf格式,也可以保存为TXT格式的呀,用RichEdit实例程序打这个TXT文件也是明码,用系统自带的“记事本”打开,就是“乱码”我问的是RichEdit保存为文件时,都做了那些“格式化”转换>>>>>>> 我问的是RichEdit保存为文件时,都做了那些“格式化”转换>>>>>>> rtf格式, 可以理解成它是一个html脚本的形式, html写出来的网页, 用记事本打开是什么样子的? 而用IE打开又是什么样子的? rtf就是这么一个东东, 想要保存成为一份TXT可以正确观看的, 是用TStringList.Text = RichEdt.Text, StringList.SaveToFile 这样吧, 我忘记RichEdt有没有直接把显示的Text保存入文件的函数了. TStringList.Text = RichEdt.Text这个如何设置》》》》》》》》》》》 var strRichEdt:TStringlist;begin strRichEdt:=TStringlist.Create; strRichEdt.add(RichEdt.Text); strRichEdt.SaveToFile('C:\123.txt');end; Editor.Lines.SaveToFile('C:\123.txt');这样也是可以的我的意思,是要是将这个Editor内的信息全写到MSSQL数据库的指定表可不可以 用RichEdit1.Lines.SaveToFile('c:\222.txt')保存的Txt,查看的时候是乱码。你可以直接用adoquery1.fieldbyname('字段').asstring:=RichEdit1.Text;这个没试过。 rtf格式就是一些斜杠数字字母之类的东西。把这些东西保存到数据库就包含格式了,如果只是保存明文的内容是不会带格式的。 这样啊我以为你只是保存Text内容呢,你可以试试把它导出的rtf文件整个保存到数据库里。 step1 :add a blob field to the database;step2 :convert the content of richedit to streamstep3 :save to stream to the blob fieldthen ok. 我现在问题是:在DELPHI7的程序中的TRichEdit中的信息都设置好,想保存到MSSQL2008中指定数据库的表中(表内的字段属性为:text),为什么保存进去后再调用出来是就是没有设置的那些“文本”信息,而我的要求是保存“格式化后的文本信息”内包括自定义的“字体、字号、颜色”等控件符信息 我保存的信息如下实例:1)保存信息若在TRichEdit中输入是信息如图而实际要保存到MSSQL数据库指定表指定字段内的信息如下:{\rtf1\ansi\ansicpg936\deff0\deflang1033\deflangfe2052{\fonttbl{\f0\fnil\fcharset134 MS Sans Serif;}{\f1\fnil\fcharset134 \'bb\'aa\'ce\'c4\'d0\'d0\'bf\'ac;}}{\colortbl ;\red255\green0\blue0;\red0\green255\blue0;\red0\green0\blue255;\red255\green0\blue255;}\viewkind4\uc1\pard\cf1\lang2052\b\f0\fs36\'ce\'d2\cf2\fs24\'ca\'c7\cf3\f1\fs44\'d6\'d0\cf0\b0\f0\fs24\'b9\'fa\cf4\f1\fs48\'c8\'cb\cf0 \par }2)读取信息就是将下面信息{\rtf1\ansi\ansicpg936\deff0\deflang1033\deflangfe2052{\fonttbl{\f0\fnil\fcharset134 MS Sans Serif;}{\f1\fnil\fcharset134 \'bb\'aa\'ce\'c4\'d0\'d0\'bf\'ac;}}{\colortbl ;\red255\green0\blue0;\red0\green255\blue0;\red0\green0\blue255;\red255\green0\blue255;}\viewkind4\uc1\pard\cf1\lang2052\b\f0\fs36\'ce\'d2\cf2\fs24\'ca\'c7\cf3\f1\fs44\'d6\'d0\cf0\b0\f0\fs24\'b9\'fa\cf4\f1\fs48\'c8\'cb\cf0 \par }再读取并进行转换成为如图 listview大图标显示数据问题 100吧,只要问题能解决,再加也可以!!!!(帮顶也有分) 如何限制memo只能输入2行文字 dbgrid中如何用SHIFT或左键拖动选取多行记录 研究傅立叶变换,找到的代码贴出来共享。。 如何才能像google,alexa,baidu的工具条一样的嵌入到浏览器 请问如何实现给sqlserver的表动态的添加字段(不懂也行,关注一下,来则有分) 紧急求救######## delphi有unsigned integer类型么? Tab键之ASCII值? delphi高手 如何将win剪贴板内的图文混合的数据copy to TStream?
并且aaB的字段的属性为:text
我在几行数据中分别设置了字号字体颜色等,我又根据“实例”进行保存
时以TXT文本方式保存,用系统中的“记事本”打开是全是“乱码”,
保存RichEdit内信息特殊代码呀,我怎么看不懂呀????
这个RichEdit在保存时,如何转换的呀????
也是明码,用系统自带的“记事本”打开,就是“乱码”
我问的是RichEdit保存为文件时,都做了那些“格式化”转换>>>>>>>
这个如何设置》》》》》》》》》》》
var
strRichEdt:TStringlist;
begin
strRichEdt:=TStringlist.Create;
strRichEdt.add(RichEdt.Text);
strRichEdt.SaveToFile('C:\123.txt');
end;
这样也是可以的
我的意思,是要是将这个Editor内的信息全写到
MSSQL数据库的指定表可不可以
adoquery1.fieldbyname('字段').asstring:=RichEdit1.Text;
这个没试过。
step2 :convert the content of richedit to stream
step3 :save to stream to the blob fieldthen ok.
MSSQL2008中指定数据库的表中(表内的字段属性为:text),为什么保存进去后
再调用出来是就是没有设置的那些“文本”信息,而我的要求是保存“格式化后
的文本信息”内包括自定义的“字体、字号、颜色”等控件符信息
1)保存信息
若在TRichEdit中输入是信息如图而实际要保存到MSSQL数据库指定表指定字段内的信息如下:
{\rtf1\ansi\ansicpg936\deff0\deflang1033\deflangfe2052{\fonttbl{\f0\fnil\fcharset134 MS Sans Serif;}{\f1\fnil\fcharset134 \'bb\'aa\'ce\'c4\'d0\'d0\'bf\'ac;}}
{\colortbl ;\red255\green0\blue0;\red0\green255\blue0;\red0\green0\blue255;\red255\green0\blue255;}
\viewkind4\uc1\pard\cf1\lang2052\b\f0\fs36\'ce\'d2\cf2\fs24\'ca\'c7\cf3\f1\fs44\'d6\'d0\cf0\b0\f0\fs24\'b9\'fa\cf4\f1\fs48\'c8\'cb\cf0
\par }
2)读取信息
就是将下面信息
{\rtf1\ansi\ansicpg936\deff0\deflang1033\deflangfe2052{\fonttbl{\f0\fnil\fcharset134 MS Sans Serif;}{\f1\fnil\fcharset134 \'bb\'aa\'ce\'c4\'d0\'d0\'bf\'ac;}}
{\colortbl ;\red255\green0\blue0;\red0\green255\blue0;\red0\green0\blue255;\red255\green0\blue255;}
\viewkind4\uc1\pard\cf1\lang2052\b\f0\fs36\'ce\'d2\cf2\fs24\'ca\'c7\cf3\f1\fs44\'d6\'d0\cf0\b0\f0\fs24\'b9\'fa\cf4\f1\fs48\'c8\'cb\cf0
\par }
再读取并进行转换成为如图