调整RichEdit行间距、字符间距

论坛 期权论坛 编程之家     
选择匿名的用户   2021-6-2 17:48   1085   0

void __fastcall TForm1::Button1Click(TObject *Sender)
{
PARAFORMAT2 pf;
pf.cbSize=sizeof(PARAFORMAT2); //识别paraformat与paraformat2
pf.dwMask=PFM_LINESPACING;
pf.dyLineSpacing=300; //行距在此设置
pf.bLineSpacingRule=4;

SendMessage(RzRichEdit1->Handle,EM_SETPARAFORMAT,0,LPARAM(&pf));
RzRichEdit1->Enabled = false;


RichEdit1.SelAttributes.Name := '宋体';

分享到 :
0 人收藏
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

积分:3875789
帖子:775174
精华:0
期权论坛 期权论坛
发布
内容

下载期权论坛手机APP