trichedit长混和串，后面是数值串如何自动换行？

wgzymzx 2012-04-23 12:56:38

比如有一个长串为：随口对抗赛的12332374732748734718747128743718738721873178
在tirchedit中会被显示成为：
随口对抗赛的
12332374732748734718747128743718738721873178

而不是我希望的：
随口对抗赛的1233237473274873471874712874371
8738721873178

请问应该如何设置，才能达到我要的效果？

...全文

123 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

寂小魔 2012-04-27

打赏
举报

回复

#10
结贴，给分

摘要:Delphi源码,控件组件,TRichEdit　　这几天做一个Delphi项目，要用到TRichEdit组件内的文字滚动，索性研究了一下，编写了这么一个实例，点击按钮可控制TRichEdit组件显示区的文字滚动。关于TRichEdit组件：它是一个高级文本编辑组件，可以编辑多行文本，并且支持RTF格式的文件。在TRichEdit中可以改变部分文本的字体和颜色，实现了简单的文字处理功能，当文字非常多时，会自动显示一个滚动条，拖动滚动条就会看到其他文字。

Delphi获取TRichEdit控件光标所在的行号..rar`

Delphi控制TRichEdit组件文字内容滚动..rar

不用第三方控件，让richEdit支持图片与表格换行 DELPHI 6 提供的RICHEDIT是1.0，并不支持图片，对复杂表格也会乱成一团，如何在DELPHI原有控件的基础上做少量修改，使之支持显示图片与正确显示表格，其实只需要几行就好了，方法如下：找到richEdit控件所在单元ComCtrls.pas (在SOURCE\VCL) //第一步 procedure TCustomRichEdit.CreateParams(var Params: TCreateParams); const // RichEditModuleName = 'RICHED32.DLL';//原来语句 // RichEditClassName = 'RICHEDIT'; //原来语句 RichEditModuleName = 'Msftedit.dll'; //改后语句 RichEditClassName = 'RichEdit50W'; //改后语句 //第二步 procedure TCustomRichEdit.CreateWnd; .... //加入一行要放在 CreateWnd 因为此时 HANDLE已建立 Perform(EM_SetOleCallback, 0, Longint(TRichEditOleCallback.Create(TRichEdit(self)) as IRichEditOleCallback)) ; //第三步 procedure TCustomRichEdit.WMRButtonUp(var Message: TWMRButtonUp); begin inherited; // RichEd20 does not pass the WM_RBUTTONUP message to defwndproc, // so we get no WM_CONTEXTMENU message. Simulate message here. // if Win32MajorVersion < 5 then //是原有1.0的要去掉 Perform(WM_CONTEXTMENU, Handle, LParam(PointToSmallPoint( ClientToScreen(SmallPointToPoint(Message.Pos))))); end; //第四步 procedure TRichEditStrings.Insert(Index: Integer; const S: string); .... //要去掉后面两名 // 1.0 uses, 2.0 will error happened 2011 // if RichEdit.SelStart (Selection.cpMax + Length(Str)) then //是原有1.0的要去掉 // raise EOutOfResources.Create(sRichEditInsertError); //是原有1.0的要去掉

RichEdit控件删除行操作自动滚屏到最后的应用示例

5,388

社区成员

262,730

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章