如何添加一个空行与大小变化

Question

我有一个字符串数组，我想在其中一些字符串之间添加一个较小大小的空行。所以我有一个代码:

  const _n=#13#10;
  //...
  r1.Lines.Clear;
  r1.SelAttributes.Size:=18;
  r1.SelText:='TEST';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+'............';
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test1';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+' ';
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test2';

和大小更改适用于第一行(带点)，但test1和test2之间的行大小与它们(18)相同=

有什么建议吗?

Answer 1

我找到了一些解决方法:可以使用制表符代替空格。

所以下面的代码可以正常工作:

  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test1';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+#9; // <- tab here
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test2';

Answer 2

不插入空行，您可以通过发送EM_SETPARAFORMAT消息到richhedit来改变单个行的行间距。参见这个问题

如何减少tRichEdit的行间距

例如

。要增加行间距，请更改"para . dylinesppaces"的值。