RichEdit

RichEdit

设置字符颜色

this->RichEdit1->SelStart=;
this->RichEdit1->SelLength=;
this->RichEdit1->SelAttributes->Color=clRed;

行间距字符间距

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

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

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

}