TRichEdit不用不知道,一用更不知道 TRichEdit设计一个编辑器(带格式颜色、字体等),要求:1、把编辑器的内容保存到一长字符变量2、把长字符变量调入到编辑器3、请忽涉及到文件请给一段代码或是伪代码 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用一个字符变量来保存内容肯定不能保存格式、颜色和字体的。除非你自定义一个格式来代表字体、颜色、格式等,调入编辑器时再还原。有点像DOS下的WPS那样。 [宋][3][居中][黑]中华人民共和国表示本行为宋体三号居中黑色。 字符数字可以吗?如:STR:Array [0..1200] of char; 就是以字符串保持 rtf格式内容嘛有Tstringstream、Tmemorystream不过,长字符变量和定长是矛盾啊 自己踉踉跄跄编了几句,下面的代码可以,以为大功告成,D7可以,xe2还不行var RichText: TStringStream; i: integer; FieldText: array[0..1000] of char;begin Editor.PlainText := False; Editor.PlainText := False; RichText := TStringStream.Create(''); //建立流 Editor.Lines.SaveToStream(RichText); //RichEdit保存到流 RichText.Position := 0; RichText.Read(FieldText, RichText.Size - 1); //流转 Char 数组(便于保存到记录型文件) RichText.Free; RichText := TStringStream.Create(FieldText); //用 char 数组建立流 RichText.Position := 0; Editor.Lines.Clear; Editor.Lines.LoadFromStream(RichText); //装入RichEdit RichText.Free XE2为什么不可以?没涉及外部文件什么的?FieldText: array[0..1000] of char;改为FieldText: array[0..1000] of ansichar;试一试 如何模拟点击这种标准格式的网页按钮呢? 问一个关于文本文件保存的问题!!! 请高手指点!!! 怎样把一个表中的某个字段的所有值加入到组合框中去 在Delphi中怎么样进行[宏替换],像VFP中的&一样。 注册表的小问题 如何做一个自动填写表单的程序 那种DBGRID可以实现这个功能 mdi的windowsmenu和 PageControl动态联系起来 在线求一实例 各位高手,关于 BDE error $000f????????? idhttp POST登录账号的时候显示“会话过期,请刷新本页面再登录” 怀念LY
[宋][3][居中][黑]中华人民共和国表示本行为宋体三号居中黑色。
有Tstringstream、Tmemorystream不过,长字符变量和定长是矛盾啊
RichText: TStringStream;
i: integer;
FieldText: array[0..1000] of char;
begin Editor.PlainText := False;
Editor.PlainText := False;
RichText := TStringStream.Create(''); //建立流
Editor.Lines.SaveToStream(RichText); //RichEdit保存到流
RichText.Position := 0;
RichText.Read(FieldText, RichText.Size - 1); //流转 Char 数组(便于保存到记录型文件)
RichText.Free; RichText := TStringStream.Create(FieldText); //用 char 数组建立流
RichText.Position := 0;
Editor.Lines.Clear;
Editor.Lines.LoadFromStream(RichText); //装入RichEdit
RichText.Free
改为
FieldText: array[0..1000] of ansichar;
试一试