RichEdit 学习

procedure TForm1.AddText(RichEdit: TRichEdit; Str: string;
TextColor: TColor = clBlack;
FontName: string = ‘宋体‘;
Size: integer = 9;
Style: TFontStyles = []);
var
nStartOffset: integer;
begin
with RichEdit1 do
begin
if Lines.Count = 0 then
nStartOffset:= 0
else
nStartOffset:= Length(Text); //Lines.Insert(0, Str);
Lines.Add( Str );
SelStart:= nStartOffset;
SelLength:= Length( Str );
//Set Attribues
SelAttributes.Color:= TextColor;
SelAttributes.Name:= FontName;
SelAttributes.Size:= Size;
SelAttributes.Style:= Style;

SelLength:= 0;
//滚动到最下方,模拟 CTRL+END 键,总不好使呢!???
PostMessage(RichEdit1.Handle, WM_KEYDOWN, VK_CONTROL, 0);
PostMessage(RichEdit1.Handle, WM_KEYDOWN, VK_NEXT, 0);
PostMessage(RichEdit1.Handle, WM_KEYUP, VK_NEXT, 0);
PostMessage(RichEdit1.Handle, WM_KEYUP, VK_CONTROL, 0);
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
AddText(RichEdit1, ‘缺省文字‘);
AddText(RichEdit1, ‘红色文字‘, clRed);
AddText(RichEdit1, ‘绿色,华文行楷‘, clGreen, ‘华文行楷‘);
AddText(RichEdit1, ‘蓝色,黑体,24‘, clBlue, ‘黑体‘,24);
AddText(RichEdit1, ‘紫色,华文彩云,32‘, clFuchsia, ‘华文彩云‘,32,
[fsBold, fsItalic, fsUnderline]);
AddText(RichEdit1, ‘黄色文字‘, clYellow);
end;

时间: 2024-11-08 02:41:35

RichEdit 学习的相关文章

MFC自绘控件学习总结

前言:从这学期开始就一直在学习自绘控件(mfc),目标是做出一款播放器界面,主要是为了打好基础,因为我基础实在是很烂....说说我自己心得体会以及自绘控件的方法吧,算是吐槽吧,说的不对和不全的地方,或者有更好的方法,请不吝赐教.我的机器环境是:Windows7旗舰版 Service Pack 1,Visual studio 20051).重绘某个控件时,强烈推荐使用子类化方法,比如想自绘Button控件, 首先添加自己的类CMYButton 继承自 CButton ,声明一个CMYButton

通过编写串口助手工具学习MFC过程——(六)添加Edit编辑框控件

通过编写串口助手工具学习MFC过程 因为以前也做过几次MFC的编程,每次都是项目完成时,MFC基本操作清楚了,但是过好长时间不再接触MFC的项目,再次做MFC的项目时,又要从头开始熟悉.这次通过做一个串口助手再次熟悉一下MFC,并做了一下记录,以便方便以后查阅.做的过程中多是遇到问题直接百度和谷歌搜索来的,所以很多都是不求甚解,知其然不知其所以然.另外做此工具只是为了熟悉了解,许多功能还没有完善!(开发工具VS2008) (六)添加Edit编辑框控件 属性说明: Auto HScroll 设置T

WIN32汇编 Richedit控件的使用

这次来介绍一下一个独特的控件------Richedit    说实话这次也是第一次接触到这个控件,以前虽然听说过但是不知道具体它是干什么的,从字面上看好像是edit控件的扩展一样,其实这样只说对了一半,Richedit控件确实比edit控件功能强大丰富,但是它们的使用位置不同,edit控件以前在学习控件的时候,就出现了许多edit控件,那时候用edit控件主要是实现向一个小的文本框中输入文本而且基本都是用在对话框中,而且大小也有限制,在单行模式下能容纳的文本不能超过32KB,在多行模式下也不能

Duilib学习笔记《02》— 界面布局

1. 界面描述XML文件 Duilib主要是通过XML来进行界面的布局配置,程序通过读取并解析XML文件来创建对应的窗体.DuiLib的页面布局分为三类:窗体(Window).容器(Contain)和控件(Control).顾名思义窗体就是要创建的窗口,容器则相当于是窗体内的一个子窗体,可以在容器内添加容器或者控件,当然定义的位置也都是相对与容器内的左上顶点:控件就是一些常用的Button.Edit.Label等窗体上的基本元素. 容器经常使用的有VerticalLayout(垂直布局容器).H

DuiLib学习笔记2——写一个简单的程序

我们要独立出来自己创建一个项目,在我们自己的项目上加皮肤这才是初衷.我的新建项目名为:duilibTest 在duilib根目录下面有个 Duilib入门文档.doc 我们就按这个教程开始入门 首先新建一个win32项目 去DuiLib根目录,把目录下DuiLib文件夹拷贝到新建项目的根目录.再把这个项目添加进我们解决方案中. 从教程里面把以下代码粘贴到我们项目的stdafx.h中 // Duilib使用设置部分 #pragma once #define WIN32_LEAN_AND_MEAN

wtl学习总结

在windows平台,相比MFC,我更喜欢WTL,因其简洁漂亮.所以陆续花了一年的时间学习之,这里总结一下(在学习Wtl/Atl之前,最好是对WinApi编程有一定的了解). 安装 Wtl主页 http://sourceforge.net/projects/wtl/ ,整个库就是一堆.h文件,官方没有提供Installer,下载后解压到某个目录即可. 如果需要在VS中使用“工作导向”,可以点击Appwiz目录下的对应js文件来安装之.虽然没有直接对VS2010的支持,不过拿VS2008的改改即可

【MFC】MFC技巧学习 当做字典来查

MFC技巧学习 摘自:http://www.cnblogs.com/leven20061001/archive/2012/10/17/2728023.html 1."属性页的添加:创建对话框的类,该类要从CpropertyPage继承: 然后在要添加该对话框为属性页的类(头文件)里创建CpropertySheet类的一个对象m_tabsheet和新创建的对话框类的对象m_skatch: 最后,在.cpp文件里的OnInitDialog()之类的函数里实现如下代码: { m_tabsheet.Cr

Duilib学习日记1

一.Duilib中各个类的简单介绍DirectUI意为直接在父窗口上绘图(Paint on parent dc directly).即子窗口不以窗口句柄的形式创建(windowless),只是逻辑上的窗口,绘制在父窗口之上.微软的"DirectUI"技术广泛的应用于Windows XP.Vista.Windows 7,如浏览器左侧的TaskPanel,控制面板导航界面,Media Player播放器,即时通讯工具MSN Messager等. DirectUI好处在于可以很方便的构建高效

Vue.js学习笔记:属性绑定 v-bind

v-bind  主要用于属性绑定,Vue官方提供了一个简写方式 :bind,例如: <!-- 完整语法 --> <a v-bind:href="url"></a> <!-- 缩写 --> <a :href="url"></a> 绑定HTML Class 一.对象语法: 我们可以给v-bind:class 一个对象,以动态地切换class.注意:v-bind:class指令可以与普通的class特