日期：2011-03-22 13:55:00 来源：本站整理

如安在RichEdit中实现上标下标[VC/C++编程]

赞助商链接

分享到： QQ空间新浪微博腾讯微博人人网

本文“如安在RichEdit中实现上标下标[VC/C++编程]”是由七道奇为您精心收集，来源于网络转载，文章版权归文章作者所有，本站不对其观点以及内容做任何评价，请读者自行判断，以下是其具体内容：

近来有好多朋友在csdn问如安在RichEdit中实现上标下标,查了好多资料都没找到.本日无意间在Delphi区闲逛,看到一份实现上下标的文章,于是整理成CB语言的贴出来.

以下代码已测试通过.在Form中安排一个RichEdit,两个Button,完好代码以下:

//--------------------------------------------------------------------------- typedef enum
{
　　CFM_Superscript, // 上标
　　CFM_Subscript,　 // 下标
　　CFM_Normal　　　 // 普通文本
}TCharacterFormat;
void MySetCharFormat(TRichEdit *RichEdit, TCharacterFormat CharacterFormat)
{
　　// ccrun(老妖)按照Delphi超级猛猜中的资料改正而成
// 欢送光临 C++ Builder 研究 http://www.ccrun.com
　　TCharFormat Format;
　　Format.cbSize = sizeof(Format);
　　Format.dwMask = CFM_OFFSET;
　　// Character offset, in twips, from the baseline.
　　// If the value of this member is positive,
　　// the character is a superscript;
　　// if it is negative, the character is a subscript.
　　switch(CharacterFormat)
　　{
　　　　case CFM_Superscript:
　　　　　　Format.yOffset = 60;
　　　　　　break;
　　　　case CFM_Subscript:
　　　　　　Format.yOffset = -60;
　　　　　　break;
　　　　case CFM_Normal:
　　　　　　Format.yOffset = 0;
　　　　　　break;
　　　　default:
　　　　　　break;
　　}
　　// The EM_SETCHARFORMAT message sets character formatting in a rich edit control.
　　// SCF_SELECTION: Applies the formatting to the current selection
　　RichEdit->Perform(EM_SETCHARFORMAT, SCF_SELECTION, Longint(&Format));
}
//---------------------------------------------------------------------------
// 先选中Richedit中的部份文本,然后点击此按钮,选中文本将变成上标
void __fastcall TForm1::Button1Click(TObject *Sender)
{
　　// 上标
　　MySetCharFormat(RichEdit1, CFM_Superscript);
}
//---------------------------------------------------------------------------
// 先选中Richedit中的部份文本,然后点击此按钮,选中文本将变成下标
void __fastcall TForm1::Button2Click(TObject *Sender)
{
　　// 下标
　　MySetCharFormat(RichEdit1, CFM_Subscript);
}